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ABSTRACT 


This thesis describes the Testing system, a CAI system which monitors the 
progress of a student and automatically adjusts the lesson to suit his/her understanding 
of the material being presented. Each lesson is divided into three segments. The first 
segment consists of questions critical to the basic understanding of the lesson, the 
second questions complementary to the lesson, and the third questions supplementary. 
After the first segment, the student’s performance is evaluated and a decision is made 
whether or not he/she should continue on to the complementary segment of the lesson 
or go on to the next lesson. Similarly, in the second segment, a decision whether to 
continue on to the supplementary segment or to the next lesson is made. Thus, a 
proficient student can progress through the material quickly, a slow learner slowly. 
The questions are grouped into types, and each of them is ranked as an easy or 
difficult concept to provide more precise guidance for the student’s improvement. An 


example lesson is provided as an illustration. 
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I. INTRODUCTION 


Over the years, the computer has become an indispensable tool in all walks of 
life. One of its important applications has been in automated instruction. It has led to 
a field of research called Computer-Aided Instruction (CAI). CAI is a powerful 
methodology for enhancing the overall quality and effectiveness of education. Many 
CAI systems have been developed for a variety of knowledge domains. Experience has 
shown that such systems often cause annoyance to fast learners and, at the other 
extreme, discouragement to the slow ones. Moreover, since learning 1s dynamic and 
non-uniform, it is desirable for an instructional and diagnostic system to adjust itself to 
the student. This helps accommodate the student’s familiarity and talents for different 
‘topics so that an intelligent/knowledgeable student is not surfeited with redundant 
information, nor a student who has extreme difficulties in a topic be dampened of 
motivation. 

This thesis proposes a CAI system which includes a diagnostic model to test how 
well the learner has absorbed the instructional material and diagnose precisely where 
the learner has difficulties. The diagnostic model being implemented here was first 
developed by Professor Taracad R. Sivasankaran and Professor Tung Bui [Ref. 1] and 
based on the Bayesian Analysis. 

The proposed system for Computer-Aided Instruction separates the questions 
into three segments. The first segment consists of questions which are critical to the 
understanding of the lesson. The second and the third segments consists of questions 
which are complementary and supplementary to the critical segment. By separating the 
questions in this manner, the system can determine after the learner has completed the 
critical questions whether or not the student has mastered the material. The system 
determines the student’s knowledge by examining the number of correctly answered 
questions and uses this information to calculate the (posterior) probability of the 
student’s ability to answer the complementary and supplementary questions. If this 
probability exceeds the upper cut-off criterion, the student is assumed to have mastered 
the lesson and may continue on to the next lesson. However, if the probability 1s below 


the lower cut-off criterion, the student is deemed to have insufficient knowledge about 


the lesson and the system will not allow the student to continue with lesson. If the 
probability is in between the two cut-off criteria, the student’s knowledge of the lesson 
cannot be determined by the student’s performance; thus, further testing/questioning is 
required. The system will then present the student with a question from the 
complementary segment. After the student completed the test question, the same 
probabilistic analysis is applied and a decision is made as to whether or not the student 
should answer the supplementary questions or go on to the next lesson. 

Chapter 2 provides the necessary background concerning the general description 
of Computer-Aided Instruction, the basics of the Bayesian Analysis, and demonstrates 
the design of the questions for the Testing System. For illustration purposes, the 
questions are drawn from the “Student Pilot’s Flight Manual” [Ref. 2]. Chapter 3 
presents the diagnostic model. Chapter 4 describes the system architecture, data 
structures, the detailed design and descriptions of the program. Finally, Chapter 5 


concludes the thesis and suggests future directions. 


If. BACKGROUND 


A. COMPUTER-AIDED INSTRUCTION 
1. Definition 

The term CAI (Computer-Aided Instruction) is commonly used to refer to all 
aspects of computers in education. The definition of CAI has been narrowed and 
considered, a distinct subject within a broader category termed Computer Based 
Education (CBE). While the actual boundaries of the definition of CAI are still 
somewhat blurred, a general consensus of what constitutes a CAI has evolved: 

“CAI is a term used to described the process of interactive teaching with the 
aid of a computer. The process directly involves the computer in the storage and 
presentation of instructional materials to the student. Both written material and 
graphics are presented to the student in a logical manner”. [Ref. 3] 

This definition, while broad, serves to distinguish CAI from another growing 
field of computers in education termed Computer Managed Instruction (CMI). In 
CMI, the computer is not normally used as a direct interface with the student to effect 
learning. Instead, the computer is used as a management tool to assist the instructor. 
The materials presented to the student in the CMI model are not of a direct 
educational nature and include such things as tests and management of the flow of a 
student’s education. The computer is used as a gate to control student progress and to 
provide extensive managerial data to the instructor to enable more individual tailoring 
of instruction. 

| Despite the fact that a few current authors continue to refer to both CAI and 
CMI as a single entity. There are two important distinctions between CAI and CMI: 


e CAT is usually performed in an on-line real time or near real time basis in order 
to provide immediate feedback of an instructional nature to the student. CMI], 
on the other hand, is typically not a real time process and focuses on the batch 
processing of data for later presentations to the instructor. [Ref. 4] 


e CAI is more intensive both in hardware and software [Ref. 5]. In order to 
implement a successful CAI system, students must have ready access to 
computer terminal, necessitating a significant investment in hardware. In 
addition, the software (which the company refers to as courseware) required to 
effect a CAI is complex and long lead times and high development costs are the 
rule. In contrast, CMI can be effective with only a few terminals for joint 
instructor and student use. Software development for CMI tends to be 
relatively straight forward and relatively inexpensive. 
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2. Basic Categories of CAI 
CAI can be further subdivided into five teaching strategies: (1) Dnill and 
practice; (2) Tutorial; (3) Problem solving tasks; (4) Simulation; and (5) Instructional 
games [Ref. 6]. 
a. Drill-and-Practice 
The user is assumed to have already learned the basis of the material to be 
presented through traditional classroom lecture techniques. The goal of computer is to 
cement the retention of the material by repeated practice and exercise. This method 
provides the student with the capability to work through the large array of problems 
and to develop an intuitive understanding of the procedures used. [Ref. 7] 
Drill-and-Practice programs tend to be organized linearly with a brief 
introduction followed by the presentation of a series of problems or solution step. A 
series of preselected problems can be provided from outside material by the student 
through appropriate interfacing with the program. The latter method is more flexible 
and provides for more student involvement. The embedding of the actual problems in 
the software significantly restricts the scope of the program and requires extensive 
maintainance to change the problem sets. Drill-and-Practice type software is 
particularly well suited to courses where a repetitive practice is required to learn a skill 
or a concept. The linear sequencing of solution steps for many mathematics and 
Statistical problems can easily be accommodated using the Dnill-and-Practice strategy. 
b. Tutorial | 
The tutorial strategy encompasses a great deal more than the relatively 
simple Dnil-and-Practice strategy. Whereas Drill-and-Practice programs serve as an 
adjunct to the instructor, tutorial programs strive to replace the instructor as much as 
possible. Logical dialogue between the student and the program about specific 
problems is the hallmark of this strategy. These programs are typically capable of 
detecting not just simple calculations and data input errors, but also errors in reasoning 
by the student. Extensive feedback is provided to the student to assist in correcting 
Bese errors. Jel. | 
The tutorial strategy is most often viewed by the layman as the epitome of 
what a CAI should be. The vast majority of the early large scale endeavors in the field 
of CAI were of this type. As computer technology has advanced, improvement have 
been incorporated into the tutorial strategy and it remains the most preferred of CAI 
methods. This technique can be tailored to fit most any learning situation but it excels 
in imparting complicated conceptual skills. [Ref. 9] | 


1] 


c. Problem Solving Tasks 

This strategy encompasses programs which are written to solve certain 
selected problems in a specific area. This is the least well defined of the five strategies 
presented in that a wide variance of the sophistication can exist between different 
programs within this strategy. This strategy places no boundaries on the various 
applications or level of difficulty of problems. In general, these programs tend to be 
more solution oriented and less concerned with developing computational or 
conceptual skills of the student. Most applications within this strategy parallel the use 
of a simple calculator; however, in this case, the programs have the ability to solve 
problems of far greater complexity. This strategy is well suited to quantitative courses 
which are primarily interested in the final solution and not the methods or techniques 
to derive the solutions. [Ref. 10] 

d. Simulation 

This strategy is generally used for the generation and manipulation of data 
or the repetitive cycling of a model when environmental factors preclude normal 
methods. These environmental factors include limitations of time, money or 
equipments; and various safety considerations. 

This strategy is based on the mathematical manipulation of complex 
modules which places the student in a controlled real life situation. Most programs of 
this type allow the user to input a series of parameters and process these, in a 
compressed fashion, through the module. The resultant information is displayed for 
user perusal and may include pertinent comments to key the student to significant 
data. In general, no learning path is predefined. Instead, the student is allowed to learn 
through actual manipulation of these processes. These types of program are frequently 
used in statistical analysis and can be very effective learning tools. Concepts learned via 
this strategy are likely to be retained by the student longer. [Ref. 11] 

e. Instructional Games 

The distinctive feature of this strategy is an attempt to use a student’s 
competitive nature to achieve certain learning goals or skills. These programs most 
often pit the student against the computer in a win-lose situation in an effort to hold 
the student’s attention and interest. Creative programming skills are required to make 
this strategy effective as a learning tool. This technique is ideally suited to elementary 
level education. 
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This thesis demonstrates Drill-and-Practice strategy. The Testing program 
is organized linearly with a brief introduction followed by the presentation of a series 
of questions in a domain of knowledge (field of aviation). The Testing makes use of 
Bayes’ Theorem to adjust a lesson being presented to suit his/her understanding of the 


lesson. 


B. BAYESIAN ANALYSIS 

Bayesian analysis is concerned with the basic problem of assessing some 
underlying “state of nature” that is in some way uncertain. On the basis of whatever 
evidence does exist, some action or actions are to be chosen from among various 
possible alternatives. In some cases, the task of the investigator will be that of 
Statistical inference, the only action to be taken being the acceptance or rejection of 
some hypothesis. In other cases, the actions will be the implementation of various 
possible decisions such as that the outcomes of these decisions depend upon the 
unknown state of nature. [Ref. 12] 

The basis for Bayesian Analysis is the Bayes’ Theorem. this theorem provides a 
very powerful tool for statistical inference, especially when pooling informations from 
different source is appropriate. Thus, prior information resulting from economic theory 
and/or. from previous (real or hypothetical) samples can be combined with the 
information embodied in new observation, and this operation can be performed 
formally, within a mngorous mathematical framework. [Ref. 13] 

Bayes’ Theorem can be explained in simple terms as follows. Assume that there 


are two events A and B whose joint probability density function is given P(A,B). Then 


P(A/B) perme) (eqn 2.1) 
P(B/A)P(A) + P(B/A’)P(A’) | 


where A’ represents the complement of the event A (that is, “not A”) (Ref. 14]. 


Notice that in the above equation there are two inputs under the form of 
probability density. The first input is the marginal probability density p(A) which 
defines the knowledge of event A prior to an observation. The second input is the 
probability density of the event B conditional upon the occurrence of event A, i.e., the 
probability that event B will occur given that event A has already occurred. This latter 


probability density provides an additional information of the event A in the form of 


13 


conditional probability density for event A under the assumption that event B had 
occurred, and the above equation provides a way in which to adjust the probability of 


the occurrence of event A in a rigorous manner. 
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Il. A BAYESIAN DIAGNOSTIC MODEL 


A. ASSUMPTIONS 

Assuming that the student has completed the study of the domain material and is 
ready to be tested upon his level of assimilation. At any point during a diagnostic 
session, the probability that the student will answer the remaining queries correctly 
depends on the proportion of the past queries on the same topic answered correctly. 

We further assume that the domain knowledge being imparted to the student is 
decomposable into blocks of concepts/ideas, so that levels of knowledge about various 
blocks of the domain can be independently measured. Blocks can be based on chapters 
outlined in textbooks. 


B. THE DIAGNOSTIC MODEL 

The proposed diagnostic model is illustrated in Figure 3.1. The model: 

1. Formulates hypotheses about a student’s strengths and weaknesses regard to 
various concepts/ideas in a specific block of knowledge domain. 

2. Tests them using a set of carefully compiled questions. 

3. Derives conclusions about the student’s problem areas. 

It has six steps to complete the above three functions. First, the hypothesis that. 
the student is more likely an average student than either very bright or very poor 1s set. 
In the second step, a block of concepts/ideas is selected out of the domain that the 
learner is to be tested upon. A series of critical questions related to that block of 
concepts is then presented to the student. In the fourth step, as explained later in C, 
depending on the number of queries correctly answered, the hypothesis can either be 
rejected or not. If the hypothesis is not rejected, the process of querying the student 
with additional questions about the same block of concepts is repeated. On the other 
hand, if the hypothesis is rejected, we move to the next block for either of two reasons: 
(1) the student is far brighter, or (2) the student is far poorer than the average student. 
This avoids irritating the bright student by asking too many questions and at the same 
time avoids discouraging the poor student as well. At the end of the session, 
appropriate conclusions are made about the degree of proficiency the student, his 


strengths, weaknesses, misconceptions, and remedial strategies are suggested. 


Set Hypothesis: Student 1s average 
Select Gonceputarbe Nested 

















Querv Student about the Concept 


Verify Hypothesis 


Case 1: Hypothesis is true 


Continue query 


Case 2: Hypothesis 1s false 


Select next concept 





(Student Verv Strong) 


Case 3: Hvpothesis is false 
Select Nextconcept 
(Student Very Weak) 


Make Conclusions 
(At End of Session) 


— ee eee 





Figure 3.1 The Diagnostic Model 
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The power of the model lies in its ability to adapt a diagnostic session to the level 
of knowledge of a student automatically by limiting the type and numbers of questions. 
This is shown by the loops connecting step 5 to step 2 and step 3. If the initial part of 
a session strongly suggests that the student is knowledgeable about a certain concept, 
then the model skips the remaining part of the session and moves on to the next 
concept noting its conclusions on a global variable. The global variable forms a 
dynamic workspace and acts as a scratchpad. It enables the diagnostic model to create 
and store intermediate observations about the student performance. On the other hand, 
if the student is average, the entire session is offered. When all the concepts are 
exhausted, the Results component (global variable) is consulted and detailed diagnostic 
about the student’s strengths, weaknesses, misconceptions, etc., is made and 


prescriptive measures suggested. [Ref. 15] 


C. THE BAYESIAN APPROACH TO DIAGNOSTIC MODELING 

It was noted that the first and fourth steps of the diagnostic model comprised of 
formulating and testing hypothesis about the student’s level of knowledge. Since there 
are looping between step4 and step3, step5 and step2, and step6 and step2, depending 
on the proficiency of the student, it is possible that the formulation and verification 
steps will be executed several times sequentially. While a student is tested upon a 
concept using short independent questions, it becomes necessary to update the 
hypothesis at the end of each cycle through the loop. We consider the Bayesian 
Statistical techniques to be appropriate and viable for such sequential updating of 
hypothesis, since they can based on the set of the latest finding during a session, 
thereby exploiting the techniques as a means of operationalizing the diagnostic model. 

Before one can use the Bayesian approach, it is necessary to impart a few 
structural characteristics to the domain being tested upon the student. To achieve this, 
we shall proceed as follows. Let there be N blocks of concepts in the knowledge 
domain that are to be tested upon the student. Focus on the first block, say C, . Let 
there be at most M questions related to C, that may be posed to the student to test his 
expertise about the block. We shall divide the M questions into three groups, the first 
containing M) critical questions, the second containing M, complementary questions, 
and the third containing M3 supplementary questions. The critical questions are those 
which are advanced in nature and cover all the important aspects of the block 
thoroughly (question | through 14 in Appendix A). In any diagnostic session with a 


student all the critical questions are always presented. If the student answers all of 


ly 


them correctly, we presume the student need not to be subjected to the remaining (M- 
M ) questions and is good enough to be tested upon the next block of concepts. The 
complementary questions are those which cover the non-critical yet important aspects of 
the block (question 15 through 30 in Appendix A). We presume that a close to perfect 
score in the critical questions combined with a perfect score in the complementary 
questions is once again an indicator of sufficient mastery over the block under 
consideration. The supplementary questions form the set of least advanced questions 
about the block (question 30 through 45 in Appendix A). They are repetitious in 
nature in that they do not cover any new aspects about the block. They merely split 
the critical and complementary questions into its elementary parts easy enough for the 
student to handle. The supplementary questions are meant to be posed to the student 
only if the performance in the critical and complementary sections has been poor 
enough to warrant them. 

In introducing the Bayesian analysis into the above domain structure, we need to 
make assumptions about the prior probabilities that form the first set of estimates 
about the level of knowledge of a student in the knowledge domain, and a first guess of 
our initial degree of conviction about each of these assumptions. 

The following two strategies are suggested to generate the prior probabilities. In 
the first, we presume that there is no real way one can estimate the level of knowledge 
of a student beforehand and hence we postulate that the chance of the student being 
proficient or ignorant is fifty-fifty. Equal probability reflects complete uncertainty. We 
will refer to this hereafter as a fifty-fifty assumption. We shall denote this prior 
probability by P,, = 0.50. The subscript wis chosen to indicate an uninformed opinion. 
In the second strategy, we assume that one way to estimate the level of knowledge of a 
student is to seek an estimate from an expert human instructor in the knowledge 
domain. Alternatively, it might also be determined by examining how the students 
have performed in similar tests historically. We shall denote this prior probability by 
using P, . The subscript x is chosen to indicate an expert opinion. Historically, if 
students have secured a grade B average in a particular knowledge domain, one can 
attribute a starting probability value of say, 0.80 for P, . Further, we assume that our 
degree of conviction in the uninformed versus the expert opinion is a to b where a and 
b are weights. We can express this in probability notations as P(B,,) = a/(a+b), and 
P(B,) = b/a+b, where P(B,,) denotes the strength of belief in the uninformed opinion 
and P(B,) that in the expert opinion. 
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Let Aj, denotes the event of begining a diagnostic session by asking the student 
My, questions about C, and the number of questions correctly answered be R, Before 
continuing the session with the remaining (M-M)}) questions, we first revise our earlier 
opinions about the expert (1.e., P(B,) ) in the light of the new evidence gathered from 


the diagnostic session so far (A,) The mathematical formulation is shown below. 


_{™y Rip Mi-Ry 
P(A)/B,) 3) Py) C-Py) (eqn 3.1) 


My Ry M,-Ry 
PAB) = \ Qo} Py) © Py) (eqn 3.2) 


Applving Baves Theorem, 
P(B,,/A,) and P(B,/A}) can be derived as follows: 


| P(B,.)P(A1/B 
P(ByA,) = = 


(eqn 3.3) 
P(BY)P(A 1/By) as P(B, P(A /B,) 
and 
Bes) aay Oe yy) (eqn 3.4) 


P(B,/A;) and P(B./A,) represent the revised degree of confidence in the initial 
hypotheses given that the student had correctly answered Ry, out of M, questions. 

In the light of the new findings, there are two possible options. One is to use a 
cut-off value for P(B,/A,), say a/pha. Alpna is the minimum strength of belief in the 
expert opinion that is required to conclude that the student’s ability to do a test is 
good. Thus, if P(B,/A,) >= alpha, we may conclude that the student is 
knowledgeable enough in C, and not pose the remaining M-My, questions. We can 


avoid exasperating a good student by asking far too many questions in a field he 
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appears to be well informed. We can store our conclusion about the student in the 
Results component and proceed with the remaining blocks of concepts in the domain 
in the same fashion. 

Conversely, if the cut-off criterion P(B,/A;) > = alpha for a good student is not 
met, it leaves us with two other possible inferences about the student. One is that the 
student is just an average student as was anticipated under one of the assumption; the 
other possibility is that the student is far poorer. We may want to make a conclusion 
about which of these categories the student belongs before proceeding with the M-M, 
questions. In fact, we may choose to spare a poor student from these questions to not 
turn the enthusiasm off prematurely. To distinguish the poor student from the average 
one, we propose using a second cut-off criterion P(B,/A,) <= beta. Beta is the 
minimum strength of belief in the expert opinion required to discern poor students. 
Thus, if P(B,/A,) turns out to be below beta, one might skip the remaining (M-M)) 
questions and move to next block. The conclusion that the student is poor about the 
concept block is stored in the blackboard for future reference. 

The other opinion arises if P(B,/A,) falls within both cut-off criterion. In this 
case, we continue questioning with the set of M, complementary questions and repeat 
the procedure. If the revised probability does not meet either criterion again, the 
session may be continued with the set of M3 questions. On the completion of a student - 
session, by assessing the remarks stored on the Results component from time to time 
during the session, detailed diagnosis can be made about the level of proficiency of the 


student and intimated to him along with remedial suggestions. [Ref. 16] 


D. EXAMPLE OF BRIGHT-STUDENT PERFORMANCE 

Let us assume that after a detailed analysis of the knowledge domain. an expert 
instructor in the domain came up with 25 (i.e., M = 25) questions about the various 
aspects of the block. Let these 25 questions consist of 5 critical (Mi. =) ae 
complementary (M> = 8), and 12 supplementary (M3 = 12) questions. Let two of the 
starting assumptions be: (1) the odds are even a student is knowledgeable or ignorant 
about the block of domain, or P,, = 0.50; (2) since historically students in the domain 
= 0.70. Further, we shall 
assume that our level of confidence in these two assumptions (p,, and p,) is 1 to 4. 
We can express this in probability notations as, P(By) = 0:20 and, P(By) — 00 e 


shall further assume the critical cut criteria, alpha and beta are 0.90 and 0.40 


have done better, it is more likely P, > P,, hence say P 


respectively. The following scenario demonstrates some practical implications of the 
proposed diagnostic model. 
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Suppose that when the student was asked the critical set of 5 questions, he 
answered 4 ccrrectly. Let A, denotes this event. We have now to make a decision as to 
whether the student is bright or poor enough based on this performance and whether 
or not we should continue with the remaining 20 questions at all. To do this, we first 


compute P(A,/B,,) and P(A,/B,) using equations 3.1 and 3.2. 


5 hi 5-4 _ 
P(A,/By) = ( , ) (5) (1-.5) 0.156 (eqn 3.5) 


5 4 5-4 
Pe 6B.) = ( ; : (.7) (1-.7) 0.360 (eqn 3.6) 


_ From our initial assumption about the strength of belief in the uninformed and 


expert opinions, we have 


0.20 (eqn 3.7) 


P(B,,) 


P(B,) 0.80 (eqn 3.8) 


Applying the results of (3.5), (3.6), (3.7), and (3.8) in equations (3.3) and (3.4), 
merger 1(B,,/A,) = 0.098 and P(B,/A,) = 0.902. 

Comparing P(B,/A,) = 0.902, with the criterion alpha = 0.90, we reject the 
assumption that the student is average. One can also note that our level of confidence 
between P(B,,) and P(B,) has improved from 1 to 4 to 1 to 9.20 in the light of the 
session with the students. The conclusion here is that the student is above average. In 
this case we suspend asking furtner questions about the block of concept in 
consideration to the student, and proceed directly to the next block of concepts. 

The fact that student was well knowledgeable about a block of domain 1s also 
noted in the Results component so that at the end of the entire diagnostic session, 
consolidated comments about the overall level of proficiency of the student in the 


knowledge domain may be made. 
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E. DEVELOPMENT OF QUESTIONS FOR THE TESTING SYSTEM 

In order to demonstrate how the proposed system of this thesis works, the 
questions used in this study are drawn from “Student Pilot’s Flight Manual” [Ref. 17]. 
This book is arranged into five chapters; (1) Partl- Before The Flight; (2) Part2- Pre- - 
Solo; (3) Part3- Post-Solo Maneuvers; (4) Part4- Cross-Country and Night Flying; (5) 
Part5- The Written and Flight Test [Ref. 2: p.5]. For purposes of testing the utility of 
the system with question sets, only “Partl- Before The Flight” was utilized and divided 
into seven ideas; (1) Starting to fly; (2) The Airplane and How It Flies; (3) Cockpit- 
Instrument and Systems; (4) Preflight-Check; (5) Starting the Airplane; (6) Taxing; and 
(7) Pre-Take-off and Cockpit Check. It should be noted that the other questions sets 
could be easily developed from other chapters or other texts for basic and advanced 
flight training. The Testing System demonstrated here may also be applied to other 
subject areas in which self-testing and self-evaluation 1s desirable. 

Forty-five questions are extracted from the above text book. According to the 
Bayesian Diagnostic model explained in Chapter 3 of this document, these questions 
are separated into three sets. The first set consists of 14 questions which are considered 
critical to the understanding of the chapter. The second and the third sets consist of 16 
complementary questions and 15 supplementary questions respectively. The first and 
the second sets of questions cover all important aspects about the chapter and the 
third set of questions does not cover new aspects about the chapter but reinforces 
already introduced concepts. However, the proposed model explains this concept in 
more details. | 

The forty-five questions are grouped into three types, procedural, calculative, and 
physical questions. Each question is ranked as an easy or difficult concept, which can 
be determined by the svstem. The purpose of this technique permits the Testing 
System to analyze in detail the specific level of the student’s difficulty in each testing 
area, and provides more precise guidance for student improvement. The questions are 
presented in Appendix A. 
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IV. TESTING: A PROTOTYPE OF PILOT KNOWLEDGE EVALUATION 


A. TESTING SYSTEM ARCHITECTURE 

The Testing System is a CAI tutorial system with a diagnostic monitor that 
makes use of the Bayesian model described in Chapter 3. Testing is implemented in the 
knowledge domain that forms part of study in the field of aviation. The architecture of 
Testing is shown in Figure 4.1. The Testing System consists of four components: (1) 


Inference Engine; (2) Data Base; (3) Temporary Results; (4) Historical Data. 


Inference Engine : 













Control Strategy - Data Base 
Temporary Domains of Questions: 
Results Knowledge Cnitical 
Complementary 
Supplementary 


Historical Diagnostic 


Data 


Monitor 





Figure 4.1 Testing System Architecture 


The Inference Engine holds information about the concepts in a domain of 
knowledge(field of aviation). It also contains the control strategies to access the other 
components in the svstem as well as the student user. Above all, it accommodates the 
Diagnostic Monitor that contains the proposed Bayesian Model. 
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The Data Base consists of a bank of critical, complementary, and supplementary 
questions on the various concepts represented in the domain of knowledge (field of 
aviation) for this prototype. Examples of such questions are shown in Appendix A. 

The Temporary Results component stores results after each question and 
essentially acts as a scratch-pad. The results are discarded once vou exit the program. 
The Historical Data component holds any data about the student’s performance in 
each test that are needed to be kept for future use. With this component, Testing can 


determine if the student’s performance is better or worse than the previous one. 


B. DATA STRUCTURES 

For efficient operation the program should not be spending a lot of time to 
search for the data needed to be presented to the student. The required questions need 
to reside in memorv in a data structure that allow quick access. The method bv which 
books/concepts and ideas are numbered ts also important. 

In this thesis, a logical tree structure was used to store the questions bank as 


shown in Figure 4.2. It is implemented with the use of menus. 





Field of concept 






@ BOD OOO 


Chapter Level 


Figure 4.2 The Logical Tree Structure of The Questions Bank 


24 


Book Level | 


The root node represents the domain of knowledge (field of aviation). Figure 4.3 


represents the root node. 


WELCOME TO THE FIELD OF AVIATION 





Figure 4.3 The Representation of Root Node 


From the root, if the student enters the command to continue ("press any key to 
continue”), he/she is going to the next level which 1s book/concept level. The menu of 
book/concept is then presented (Figure 4.4). 


Pee Oe li Cimon OF THE FOLLOWING 


STUDENT PILOTS FLIGHT MANUAL 
PRIVATE PILOT STUDY GUIDE 
INS TREIMENT BEIGHT RULES 

” QUIT ” (exit program ) 


{ type only number you want ) 





Figure 4.4 Menu of Valid Concepts in The System 


The user/student can choose one of these nodes which is the book/concept number. 
After the user/student selects a number (node), he/she is going to the next level of 
chapter, and the menu of chapter is presented (Figure 4.5). 

The user/student may again choose one of the nodes which is the chapter number. 
Each node (number) in this level represents chapter of the selected book which 
contains test questions. We see that, The number of books is the number of children of 
the root node (field of aviation). The book/concept is the parent of the chapters and 
the number of chapters is the number of children of that book, By using tree structure, 
choosing any chapter to test is like traversing downward the tree from the root. The 


Testing program handles a domain of knowledge (field of aviation) with 3 concepts and 


ZS 


”“ STUDENT PILOT FLIGHT MANUAL ” 
SELECT ONE OF THE FOLLOWING 


TYPE 1.....for PART - ONE 
TYPE 2.....for PART - TWO 
TYPE 3.....for PART - THREE 
TPYE 0.....for SELECTING ANOTHER CONCEPT 





Figure 4.5 Menu of Valid Chapters 


3 chapters in each concept for an illustration of the logical tree structure. It was 
decided to use text files to store questions; each file contains ‘questions, correct 
answers, categories of questions and comments for each test (see Figure 4.6 for 
explanation). 

In order to store the student’s performance, an array of records is used, and 
stored in main memory by defining it as a global variable. One record per chapter/test 


contains all student’s performance about that test. It contains fields for how many 


'_ questions in the test and, in each category of question, the number of correct and 


incorrect answered, number of questions completed, the names of concepts and ideas, 
and also detailed performance in each category of questions ( see record Chap in 
Appendix E ). The vaniable Chapter (see Appendix E) is of type array. Each element 
of the array contains one record of student’s performance to be used by the program to 
diagnose the student according to the proposed model and to provide scoring and 


commentary at the end of the session. 


C. TESTING SYSTEM CONFIGURATION AND DESCRIPTION 

The test subject chosen was Pilot Knowledge Evaluation. The program Testing 
is written in Waterloo Pascal on the IBM mainframe (IBM 3033 AP). The program as 
presented is designed for a pilot or student pilot. The student/user is assumed to have 
already learned the basics through traditional classroom lecture techniques or by 
himself and now needs to test his/her knowledge. Questions about various concepts 
are stored in the Data Base component so that the student/user can select any concepts 


which he/she has already learned and be evaluated as to whether or not he/she has 
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absorbed the instructional material as well as to be diagnosed as to where he/she has 
difficulties. The user is only required to know the minimal knowledge of how to 
operate a computer terminal. 

As the student is going through the test, his/her performance will be recorded in 
the Temporary Results component, and (after a certain amount of questions have been 
asked which are required by the control strategy), the system will determine the 
probability of his/her ability to answer the rest of the questions. If this probability(P) 
exceeds the upper cut-off criterion (A = 0.9), he/she is assumed to have mastered the 
lesson. He/she is exempted from finishing that lesson, and may continue onto the next. 
If the probability is below the lower cut-off criterion (B = 0.4), he/she is deemed to 
have insufficient knowledge about the lesson. The control strategy will either suggest 
the student restart that lesson again or select another concept to study. If P is in 
between the two cut-off criteria, he/she is assumed to be average, thus, further 
questioning is required. At the end of the session, when the student wants to exit the 
program, appropriate conclusions are made about the degree of proficiency of the 
student, his/her strengths, weakness, and misconceptions, and remedial! strategies are 


suggested. Appendix B and C demonstrate Testing. 


D. TESTING SYSTEM DETAILED DESIGN AND DESCRIPTION 
| 1. Design of the File 

The question set for each test is designed as a separate text file. When a 
student selects a test, a specific text file contains only questions for that test is called. 
As explained early in Chapter 3 (Development of questions for Testing System), the 
questions are: (1) separated into 3 sets: critical, complementary and supplementary 
questions; (2) grouped into 3 types: procedural. calculative and physical auestions; (3) 
determined individually by the system as an easy or difficult question. These questions 
cover seven aspects of “Partl- Before The Flight”, in “Student Pilot’s Flight Manual” 
{Ref. 18]. The design of this file is shown in Figure 4.6. 

In Figure 4.6, the line under the correct answer contains one number and two 
characters. The first digit indicates (for the above question) which of the seven areas 
the question refers to {Partl- Before The Flight}. Codes for these areas are shown in 
Figure 4.7. The character following the first number identifies the question type, 
procedural, or calculative, or physical question. Codes for these types are shown in 
Figure 4.8. The last character on the line under correct answer indicates the above 


question is considered an easy or difficult one (“e” stands for an easy question, ”x” 


Zi 


File : Filel Text Al 


45 (* number of questions in this file *) 
14 (* number of critical questions *) 
16 (* number of complementary questions *) 
15 (* number of supplementary questions *) 
beeen ee (* Body of questions 9)... 

| scssiviseos eee eeeeeee eee 

2..-(* FOUF MUltiplercheicess ar 

3 ss sanis sntendenend eee 

Ah oss iecadel os eee Re eee 
$ (* symbol indicates end of question! *) 
2 (* correct answer *) 
2se (* to be explained *) 


...(* comment & suggestion for question | no more than one line *)... 


” 


Z) sivicnsasesansodecceueeee teeter eee Eaeeeee 
oidip-elsiainie’oa'eia Weitere ee ase MERU Soo aime eC TEE enraee 

Lvscaset een einer ree eee 
Dive suasercelenee tne eee eee 
3 debsssdicucetepeeeteneataeee meee 
Ge decuay his aa one ee ee eee 

S 

2 

3px 


eooeveoeeveere set eoeeeeese eee eneeeeneseoe 


eeeoeeeeeso1787000980988 088888888 O 


Figure 4.6 The Design of File Containing Questions 
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stands for a difficult question). For example, ”2se” on the line under correct answer in 
question | of Figure 4.6 means the above question is in the area of “The Airplane and 
How It Flies” (2), it is a physical question (s), and considered an easy one (e). An 


example of this file and questions are shown in Appendix A. 


Codes # Meaning 


” Starting to Fly ” 

” The Airplane and How It Flies ” 
” Cockpit-Instrument and System ” 
“ Preflight Check ” 

” Starting The Airplane ” 

” Taxing ” 

” Pre Take-off and Cockpit Check ” 





Figure 4.7 Codes for Areas in Part 1- Before The Flight 


Codes # Meaning 


” Procedural question ” 


” Calculative question ” 


” Physical question ” 





Figure 4.8 Codes for Types of Questions 


2. Description of Operation and Examples 
The proposed program was designed using a top-down stepwise refinement 
methodology. Figure 4.9 shows the steps of operation in Testing. 
The operation of Testing begins with a students need to test his/her knowledge 
of a concept which is provided in the domain of knowledge (field of aviation prepared 
in the system). The student is provided a listing of concepts, which gives him/her a list 


of valid ideas provided in the system. Figure 4.4 shows the menu of concepts. 


ao 





Select 


chapter? 


| 
| 
} 
| 
— Conclusions 





| 
| P = Probability of. 
student's ability. 
to answer questions 
A = Upper cut-off criterion 
B = Lower cut-off criterion 


Hl i 
CO 
S.0 





Figure 4.9 Testing System’s Flow Chart 
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Once the student entered the desired concept to test upon, information about 
the test’s processes is presented. This gives the student some idea of what is going to 
be presented during the session. When the student enters the command to continue 
(“press any key to continue”), the list of chapters within his/her selected concept is 
provided so he/she may choose the one that he/she wants to work on. A sample list 1s 
shown in Figure 4.5. 

The very last step of the system is presentation of the final score and 
comments which is made after the student enters the quit command (“type.. 0”). This 
shows the student’s performance in the test (mistakes that he/she made and percent 
grade in every aspect of the selected chapter). If the percent grade in any aspect 1s less 
than 50, the system gives notice to the student of his/her mistakes and areas of 
difficulty. The svstem also records the student’s performance permanently in a 
historical file for future use (student ID#, name, date, and grade in every test). 
Previous historical data 1s provided so that the student will Know his/her status to date. 
Examples of score and commentary are shown in Appendix B and C. Appendix B 
demonstrates the performance of a bright student, Appendix C demonstrates the 


performance of a weak student. 
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V. CONCLUSIONS 


A. DISCUSSION OF THE RESEARCH 
In this thesis, a modification of the standard CAI system is presented. This 

modification is unique in that it combines the standard tutorial strategy of CAI and the 
Bayesian Analysis to tailor a lesson to better suit the student’s ability or proficiency in 
mastering the subject being taught. It demonstrated the feasibility and benefits of 
using an intelligent CAI system to assist learning strategy in any domain of knowledge. 
The use of Pascal as a practical language for the intelligent CAI systems was shown. 
The benefits of Testing are: 

e Provides a simple approach. 

e Easy to develop and implement. 


e Suited to courses where a repetitive practice is required to learn a skill or a 
concen 


e Allows a student to work through a large number of problems to gain an 
intuitive understanding of the solutions procedures. 


e Uses little core memory, runs fast, and can be used in portable microcomputer. 
e Provides self-testing or self-evaluating. 

e Reduces the instruction time of bright students. 

e Provides the slow ones to progress along at their own Dace: 


@ Accelerates the learning process through identification of weak areas. 


B. TESTING SYSTEM LIMITATIONS 

Testing is a prototype program that was designed to demonstrate the concept 
that an intelligent CAI system using the Bayesian Diagnostic model could provide 
valuable assistance in tutoring the student to learn the lesson. This prototype program 
demonstrates concepts in the field of aviation in which the author has experience. 

Due to time limitations, the Testing program was developed using a limited 
number of concepts and test questions. One test question set has been made from 
Chapter | of “Student Pilot’s Flight Manual” (Ref. 19]. The program was designed to 
handle 3 books (see Figure 4.4) with 3 tests in each book. With this designed, it was 
possible to demonstrate the functions of the proposed model. Since this program was 
written in Waterloo Pascal on the IBM mainframe (IBM 3033 AP), it can be used in 


oe 


some personal computers, if the program is rewritten so that it can be used on more 
personal computers. It will be more practical for some small organizations to use this 
syetem. Another limitation is this program is not graphics-interfaced which would help 
the user/student in learning. The system could display pictures to describe some ideas 
that cannot be done well by text. 


C. FUTURE PROGRAM IMPROVEMENTS 

The purpose of this document is to demonstrate the proposed model in Chapter 
3. With the time limitations, the program handles only a few concepts. The data 
structures used in the program are arrays, records, and files. The program can be easily 
modified to handle many more concepts by increasing number of arrays to store the 
records of student performance. It is easy to increase the arrays of records by changing 
the global constants such as maxbook, and maxpart {see Appendix E) that indicate 
maximum number of concepts and maximum number of tests in a concept respectively. 
The Testing program is composed of only a few modules or procedures. It is easy for 
an experienced programmer to understand the functions of each module. It would take 
only a few days to develop Testing program to handle more concepts. The major tasks 
are to do some changes in those procedures that determine which concept is selected 
by the user/student and present him/her with the test questions. The procedure 
Booklist, Beginsession, Whatchapter, and Selectchapter must be modified by adding 
numbers that identify the concepts in the same fashion as previously done (see 
Appendix E). The only time-consuming task is to develop the questions for the 
concepts that are needed. Time to complete the questions is dependent on how many 
concepts are required and the people who develop the questions. 

For better program improvements, a linked-list representation is recommended to 
store the student’s performance instead of arrays. One advantage of a linked-list 
representation over the arrays used in Testing is that less memory space can be used. 


For better tutoring, a graphics interface is recommended. 
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APPENDIX A 


ILLUSTRATION OF QUESTIONS USED TO DEMONSTRATE TESTING 
SYSTEM 


The following questions are drawn from Student’s Pilot Flight Manual. 


1) Which one of the following statements 1s correct concerning "torque" 
corrections (U.S.-built engines)? 


1. Rees In a ee left rudder is necessary to keep the airplane 
Sura: : 
Zeta als In a climb, right rudder is necessary to keep the airplane 
straight. 
cere In a er right rudder is necessary to keep the airplane 
Strada ‘ 
Og aks When eaiey is added abruptly, the airplane will tend to 
s roll-te thes wight. 
2 
2se 


'Torque’ sée Ghapter Z| figeec-sjeecemue 
2) Which one of the following statements concerning the Four Forces 
1S CoOLrect4 
1.....Zn straight and level flight, all Four Forces have 
equal values. 


iene In. 4 €lamb; rcueas gucaben than weight. 

Steer sie In straight and level unaccelerated flight, thrust is 
greater than drag. 

A eiiats Lift acts perpendicular to the relative wind, whether 


the airplane is climbing, flying, flying straight and 
level, or gliding. 


2se 
'Four Forces" See chapter 2 stig. o2-s moeoe 

3) True altitude is height above the sea level, and absolute altitude 
1s height above the surface. With this in mind, choose the correct 
answer to the following: An airplane is flying over the ocean at 
an actual height of 10,000 feet over the water ; 

(altimeter setting’ and temperature unknown). It is flying at its 
ora ee density and absolute altitudes. 


Caras ressure and absolute altitudes. 
Stee rue and absolute alereudes. 

s ec true and density altitudes. 

3 

3p 


x 

‘Study all four types of altitude’, in chapter 3. 

4) You are flying at an indicated airspeed of 120 knots at 6,000 feet 
assume no instrument error) the outside air temperature is +3. 
egrees celsius. Your computer is back on the counter at the airport, 

but using rule of thumb you can estimate that your true airspeed 

is appres nae 


neta eke 140 mph. 
Zaaeeeiiee 134 knots. 
Siemens 124 mph. 
s 1 ae 144 knots. 
2 
3cxX 


see chapter 3, ‘Rule of Thumb', page 134, SPSG. 
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5) If you are referring to the magnetic compass on a heading of east, 
an acceleration of airspeed(maintaining a constant altitude 
will result in 


peters = a more northerly indication. 
2.-...a more southerly indication. | ao 
iS eemepe << no change in compass indication, since 1t 1s correct on 
east or west heading. 
5 ee northerly turning error. 
1 
3s 


x 

'ANDS', p.45 (SPFM) and p.134,#308 (SPSG).. 

6) During the pretake-off check after checking the mags, you pull 

the carburetor heat ON at 1800 rpm(or the manufacturer's | 

recommended number). There is no change of rpm (plus or minus). 

when rou putlet ON or for 20 s@eonds thereafter. This is a sign :- 

fees si carburetor ice was present before the heat was applied. 
Seceas theres Vdc Noecarouneton Ge present before the heat was 
applied. j . 

3.....the carburetor is not getting heat from the system. 
4,.....you did leave the heat on long enough to get an effect. 


Px . ; ’ ; : 

Beemeeton or Carburetor’, séé item G in Fig. 4-M,Fig. 4-2 in SPFM.. 

) After starting your airplane's engine ona cold MOBnInC = VOUS Laxl , Out 
and make your pretake-off check. After the nad and carburetor heat 
Gieem you reduce the power to idle and find that even though the 
See. 15 warmed up it lopes and run very rough, nearly quitting but 
no gute. A likely problem is that the 


$ 
3 
4 
y 


Resei's 's fuel selector valve has been in the OFF position since 
petore starting. 
Zaria cabin heat is ON. 
3.....primér ts not in and locked. 
s aa eaten electric fuel pump is not ON. 
3 
5 


2 
mmemer system', Fig. 23-17,SPFM.. ; 

8) It is a very hot day and the trainer you are going to use has just 
come down froma flight. After thorough preflight check you get 
fastened in. After using your usual procedures you holler CLEAR 
Semntc the Starter; the propeller turn over and over with no 
Picea tLon that the enginé’ wants to start. This 1s probably because 


Here. 6 3-6 the mixture is not rich enough. 
Ceres the engine is loaded( flooded). 
Sais the carburetor heat is not ON. 

‘ Ae 6-3 the engine has cooled too rapidly. 

Z 

pee 


'Hot start procedure', in chapter 5, SPFM. 

9) You hit the starter of your trainer, and as the propeller turns over 
(the engine hasn't started running well yet), you note that 
SSeetatens abe Siabting wide-eyed at the bottom area of the cowling. 
Mour invtial besit move is te Se: . 

Bess: shee the window and state firmly that 1t 1s impolite to 
stare. 

2.....pump the throttle to help assure that plenty of fuel is 
getting to the carburetor. 

3.....Keep the engine turning over and turn off the mixture 
and fuel. ; 

s 4.....stop the starting procedure until they stop staring. 

S 

ose . 

eee Filot Operation Handbook, ‘starting procedure’. 
10) Hold lines are a combination of two solid and two dashed lines 
crossing the taxiway before it intercepts a runway. The tax1 
guidance line extends through the hold lines and onto the runway. 
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This means that .! 
1.....you don't have to slow up before taxiing onto the 
runway at uncontrolled airports. 
2.....you only to recognize hold lines at controlled airports 
because ground control will give or refuse clearance to 
cross them. 
3.....hold lines should be Lee diy alle asnponts.. Olu 
will need ATC clearance to cross them at controlledsauneome 
at uncontrolled airports you should always hold and check 
for traffic Dbetoresgcing Ontcmenc manus 
4.....the taxi line has precedence over the hold lines at all 
airports. 
S 
3 


6px 
eae chapter 25 of SPSG, Flying the cross counuay 
11) You are taxiing a tricycle-gear airplane with a strong wind from 
the right rear. The control positions should be as follows: 
.. Control wheel forward and Curned right) uddem.as 
necessary to keep the airplane straight. 
2.....Control wheel forward and turned left, rudder as necessary 
to keep the a eae straight. 
3.....Control wheel aft and turned lett. full Vere rudder 
Oo. stone Control wheel forward and turned left, full right rudder. 


6SxX 
'study technique of taxiing in a strong wind.' 
12) When taxi downwind with strong wind, you should: . 
il verceanere hold the wheel forward so that the wind strike the down 
elevator and keeps the tail from rising. 
Z2....-hold the wheel back so that the wind force the propwash 
hold the tail down. 


3.....taxi with engine idle, use brake to keep speed down 
because of the wind torees (hema tee lance rome ce css 
5 4.....taxi with small power and use brake to keep speed. 
1 


SX 
'How to taxi downwind with strong wind', see SPFM, p.37 | 
13) You are checking the magnetos at the run-up spot and inadvertently 
turn the switch to OFF. The best move for you before turning it 
back on 1s to 
1.....pull the carburetor heat ON. 
2sss6.Close the throtele, 


3.....pull the mixture to vdleseuc-ore. 
; Baas switch tanks. , 
Z 
7p 


x 
‘Accidentally turning magnetos switch of eed Guns 
14) You have just completed the run-up. Just before starting to taxi 

into the take-off position, you realize that the fuel gage shows 
the tank you ran up on is very low in fuel while the other is 
nearly three quarters full. You recall this was that the case when 
you visually checked the tanks, but you forgot to put the selector 
on the fullest tanks. You should 


eee switch tanks and continue the take-off. 
Berea keep the airplane on the tank you did the run-up on and 
go ahead and take-off. 
3 ct switch tanks and run the engine up to at lease 1500 rpm 
Ee 2 minute or more, or redo the mag and carburetor heat 
check. 
s 4.....-do none of the above. 
3 
7px 
'Very low fuel gage before taking-off!. ; 
15) You are solo’and just lifting off (with the runway gone behind) 


1t sounds as if the engine Is banging itself to destruction. The 
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airplane is Peaeoeming as usual (rpm,pressures, and temperatures 
are okay). The best move in this case is to , 
Ls .saneinealneconunrol of the ee oe as you continue to climb. 
ely. 


Zien land straight ahead immedia 

3... udbiebeene tO the alrport without delay. 
s Gis aceueene start dumping ballast overboard. 
i 
c 


x 
eetch engine Eight atter tCaking-off'. 
16) Which of the following combinations would most likely cause loss of 
power and/or a rough-running engine Saag We pPeetake=ort check: 
Witsoe pORee deed nlc elevation nig outside air temperature, 
mixture full rich, and carburetor heat ON. 
.-Alrport at sea level, low outside air temperature, 
hime eeeurliichi, aveaecatpuretor heat ON. 
3.....Alrport at a high elevation, high outside air temperature, 
mixture leaned, and carburetor heat OFF. 
4....-Alrport at sea level, high outside air temperature, 
mixture full rich, and carburetor heat OFF. 


NO 


S 
it 
7S% . , 
'causes of losing power and/or rough ee gane Piensa kerr. 
17)You are a private pilot and plan to fly a trainer into a 2000-foot 
farm strip. You check the Pilot's Operating Hand-book and see that 
Bieedt hp lAnemcanweanduson take-oLf with about S00 feet to spare. under 
the Beee cue conditions. At the end of the heme rc One check you 
Glose the throctle and the €ngine idles at 800 instead of the 
recommended 600 rpm. You shou 
COMES Ene tlights 
Z2.....taxl back and get the mechanic to reset the idle to the 
recommended Value before flying. 
3.....continue the flight but expect a steeper approach and short 
landing roll because the extra windmilling effects will 
Creaubesanaca. 
4.....be sure to notify an instructor or mechanic about the high 
‘ idle value after you get back to the home airport. 
2 


7px 
Hidle rpm exceeded at the end of pre-takeoff check’. 
18) Taking off at higher altitudes and temperatures for a particular 
airplane (at a given weight) will require 
Perrone runway because the air is less dense. 


Zeeaie: eis less runway because the air is less dense. 

Seles s3 the same amount of runway because the less dense air 
create less drag, making up for any power loss... 

Bwana more runway because the air becomes more dense with 


increase in altitude. What horse power is required to raise 
55 pounds to a height of 6 feet in 3 seconds? 


2SX 
‘taking off at high altitude and temperature, p.6 SPFM'. | 
19) What horse pomee is required to raise 55 pounds to a height of 


6 feet in seconds? 
Nees. “at if LO 
Pree. LO 
Bo am H/5 
A sens te lee 5 
$ 
3 
z2ce 


‘how to determine horse power at a situation’. | 
20) The drag resulting from lift being produced is 


1.....parasite drag. 
Zens: interference. 
Se aotetoue induced. 


45. «sGVEOSCOPILC, 


oi 


$ 
3 


2SX 
'DRAG', and see ooo 2-14, 2-16 in SPEM. 
21) Which of the following statements 1s correct concerning drag? 
1.....Induced drag increases as the airspeed increases. 


2 rivers If parasite drag is 200 pounds at a straight adn level 
speed of 100 knots, at 200 knots it will be 800 pounds. 
See Skin friction drag increases with increased airspeed. 
Qaueiee Induced drag decreases as the airspeed decreases. 
$ 
Z 
2CX 


'study the definition of DRAGS in SPFM.' | 
22) You are flying on a solo cross-country in a trainer and realize 
that the oil pressure gage is at ZERO. Your best initial move 
would be to | ye 
Leone land immediately;the engine will stop within 3 minutes. 
Civaeneee watch the oil temperature gage for an increase in 
temperature as you fly toward an alrport Orn better Lenmar. 
Zeer ay no attention Co 1t but continue youn flight. 
4.....land immediately to 7700 on the transponder 
: (if you have one) and call MAYDAY on 121.5. 
2 
3px ; 
‘emergency procedure for zero o1l pressure in flight.' 
23) If the engine-driven vacuum pump fails in the average trainer, 
you would expect to lose the use of 


eeenorene airspeed and altitude indicators. 
Zee altimeter and altitude indicators. eee 
Serene: altitude indicator and heading(direction)indicator. 
é Orin teens vertical speed indicator and turn coordinator. 
3 
3SX 


‘loss of enqine-driven vacuum pump, see Fig. 3-22, SPEM.'. 
24) At a calibrated airspeed of 150 knots at a denen! altitude of 
10,000 feet, you want to set up a standard rate turn. Using the 
altitude indicator for bank angle, you would set up a bank of 


approximately 
T eccoseee 15 degrees 
2.....29 degrees 
Serer 35 degrees 
s Gee 6 ais 10 degrees 
2 
3CX 


'standard rate turn at any particular airspeeds. ' 
25) Which one of the following items would require the most 
electrical current when in operation? 
ee sLanGing ideale 


Cons Turn and slip indicator. 
3.....Flashing beacon. 

é Guede se Navigation receiver. 

1 

3se 


‘electrical system. '! 
26) Which of the following would most likely result in a sudden increase 
in oil consumption in the engine of an airplane? 
(There are no outside leaks in evidence. ) 
lowes vEreded spane plug electrodes. 
Z.....Worn or broken piston rings. 
3eeceeeA poor adjusted carburetor. 
Ais sits A coagulated frammis. 


4sx 
‘sudden increase in oil consumption. '! 
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27) As an all-around procedure you should ne 
reece Gemoemare hyena tank ary Eo use all the fuel only if 1t 
1s a fuel injection system. |. 
Wome apecituds de lay Of mt =2useconds im power atter the selector 
is switched from an empty to a usable tank with the fuel 
injection system. 


Sneiarers « eet oceny run a tank dry only at altitude above 1500 
ee 
: Ais 3he never deliberately run a tank dry. 
4 
4p 


x 
Beebtperately run a tank dry during flight?’ 

28) You have your private certificate and are taking a friend for a 
meeoeerige. You find Chatwsthe battery 1s dead. It's late and 
mrene 15 no one else at the airport, but pues! cables are 
available. Also, you have checked out to hand-crank the airplane. 
Your next move would be to 


HW 6s carefully show the friend how to hold the brakes and turn 
the ignition switch ON while you hand-crank the airplane. 

is show the friend how to hold the brakes and use the starter 
While you set up jumper cables from your car. 

ete Seeby shel e9h= pore aeue Oestaktell mola tneurrlend can work 
the jumper cables (revving up the car and then removing 


the cables after the start). | 
Geese. s Covcemmeeweerl I Gleeume tne arrplane's electrical system 
; 1s back to normal. 
= 


5px 
perocecure for dead battery before taking off. ' a 
295 A soft or spongy brake is usually the result of having air in the 
system. To get braking action you should do which of the following? 


eh oe Pump the brake pedals. 

Divers «s Hold the pressure but do not ee 
[ee Pull the parking brake handle outward. 
ae Stay completely off the brake. 


i) 
6px 4 e 4 4 
‘procedure for having a soft or spongy brake while taxiing. ' 
30} The "best" fuel-to-air ratio is approximately 


AMES ae: i ton 1S. 
eee eas 15 tor 2 
See cas occ tS 
ne Z0 to 1 
S| 
iv 
5px 


wane cO-air ratio. | 
Siyine angle between the relative wind and the chord line of the 
per eOLl as the oe 
1.....angle of incidence. 


Zany. angle of attack. 

oa Lamminc angle. 
; Oe es angle of climb or glide. 
Z 
Z2pe 


‘angle of attack', see Fig. 2-5, SPEM. 
32) Brake pousepowes is 
1.....Horsepower per developed at the crankshaft. 
ZT nOlsepOvensceve looped Dy the propeller in moving the 
dt opie unnOugh tne air. . 
3.....measured as pounds of thrust horsepower in older airplane. 
At always the same as thrust horsepower in newer airplane. 


NO 


pe 
'prake horse power', p.6, SPFM. 
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33) Gravity always acts 
1... Opposite Comet Ones . 
Asiiacn Pavan veweDute opposite TOBE ee. 
3.....perpendicular to the total drag. 
Greets oward the center of the earth. 

$ 

4 


Z2pe 

A ravity, see "Weight", SPFM.' 

34) In computing airplane performance, the pilot or engineer uses 
ences ensity altitude. 


Zee etoys CUCM te gee 
3.....absolute altitude. 
; 4,.....indicated altitude. 
d 
See 


‘computing airplane performance. '! a | 
35) Indicated airspeed corrected for instrument and position error is 


oonue true airspeed. 
Zeer calibrated airspeed. 
Sis a stees equivalent airspeed. 

s 4..0s.Stalic Pressure. 

2 

sce 


‘understanding all four kinds of airspeed.' 
36) Equivalent airspeed corrected for density altitude effects is 


L eeetees calibrated airspeed. 
Zee indicated airspeed. 
Siasienade true airspeed. 

5 ee density airspeed. 

3 

56e 


‘the relations among the airspeeds. ' 
37) The job of pitot tube is to admit what pressure of pressures to the 
airspeed indicator? 
ele eae only. 
2 S 


pear atic only. 
322s. Stable wand VOu tl caimenancesn 
4 Se Dynamic and static. 


$ 
4 
3pe 


Pp 
‘the function’ of Ptcoc. tube eseeacon. 
38) A job of the alternater is to 


eee provide a spark to each magneto as needed. 
Zier: provide vacuum for the gyro instruments. 
3.....run the electrical components and keep the battery charged. 
4 eee alternate the power from the brake system to the electrical 
system. 
S 
3 
3 


pe 

‘the functions of alternater, check POH.' 

39) The majority of turn and slip indicators or coordimators amecur rene 
smaller airplanes are powered by the 


Ll... static pressure system. 
Zaher ste re engine-driven vacuum pump. 
Sie ay Falllle system, 

: ee electrical system. 

4 

3pe 


‘soures power of instrument indicators. '! 
40) The vertical speed indicator operates on the principle of 


irene change in outside atmospheric pressure. 
Zocees absolute atmospheric pressure. 
Sev atenene precession. 
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4.....dynamic pressure from the pitot tube. 


$ 
1 


3pe 
iow the vertical speed works.' 
41) The addition of carburetor heat 
Pies sare leans the mixture. 
Zee eae has Nevertect On the mixture. 
Sere oT CiecmEne mk cent e . 
s 4.....cause oil pressure fluctuations. 
3 
4se 
gencecstand the uses of carburetor heat.'! . 
42) An advantage in the fuel injection system over the carburetor is 


that 1t 
eee has better fuel distribution to the cylinders. 
Crate does not eco an alternate air system. 
3.....can be used best with fixed-pitch propellers. 
s Bea ss has a simpler oil system. 
if 
4p 


e 
‘the advantages of fuel injection system. ' 
43) Smoking in an airplane 


leit aa is useful in finding out the wind direction by blowing 
the smoke out of the window. 
Die a ais may cause you to be thrown overboard by a nonsmoker. 
riers! can cause clogging of the vacuum system air filter. 
; Ah nies) can clog the carburetor heat. 
3 
4se 


‘causes of carburetor clogged during flight.' 

44) You start the engine and check the oil pressure gage. The needle 
ages t move right away, but you figure that since it's summer 
you can expect it to come to normal operation within 

ieee. -t2 NOUrS and 26 minutes. 
..5 seconds. 


Bcc: 30 minutes. 
s Ort eve 30 seconds. 
4 
5pe 


‘operating of oil] pressure indicator after starting the engine. ' 
45) Taxiway marking are 
....wWhite dashed lines. 


Zoo eects yellow solid lines. 
Bieter yellow dashed lines. 
‘ a aue els white solid lines. 
2 
ose... 
— Mamkind: ; Se€e@sorsGer.19 
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APPENDIX B 
DEMONSTRATION OF BRIGHT-STUDENT PERFORMANCE 


KKKEKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKKRKKKKKKKKKKKKKRKKKKKKI 


OF OF 


* 
* 
WELCOME TO THE FIELD OF AVIATION 5 
* 
* 


KEKKKKKKKRRKKKKKRKKKRKKKRKRKKRRKKKRKKKRKKKRKKKRRKRKRKRKKKKKKRK 


please type your number 
our name ? 
oday date,(ex. 10 Apr 87) 
"Oress enter to continue!" 


RAKRKKKKRKKKKKRKKKRKEKKRRKKRKKRERKKRKRKRKRKRRKRKRKKKRKRKKRKRRKRKEK 
* * 


: PLEASE SELECT ONE OF THE FOLLOWING : 
. L.eeeeStUDENT PILOTS FLIGHT MANUAL : 
: Zevee -ERIVATE PTLOL STUDY]GUIDE : 
: 36.6 -sLNSTRUMENT FLIGHlenULEs a 
O..66.f0F GOUT ie! SS exiceorogran : 
x « 
k * 
x x 


(Type only number you want ) 
KAAKAKAKAKKAKAK KKK KK AAAKKAAKAKAKAKKKAKKKAKKKAAKKAAKA 


KARKKKKKKKKKKRKKKKRKRKKRKKKRKKRKEKKKRKRKKRKKRKKKRKRKRKRKRRERKERKEKRKGI 
* 


In each test which you will work on :- 


k k 
k k 
- There are 3 sets of questions. ae * 
C Each set is different in level of difficulty * 
- The most difficult set will be presented s 
Z first and then the next two sets. | ‘s 
: 4) You will be evaluated after completing each : 
x x 
x k 
k x 
k k 
k k 


Whi 


of the first two set of questions. | 

5) If _you are about average, all questions 
will be presented, otherwise you do not 
have to do all of the questions. 


KEKKKKKKKKKKKKKRRRKEKKKRKRKRRKRRKKRKKKKRKKKKRKRKEKRKKRKKKREKKRK 


" press any key to continue " 


KRKKKKRKKRKKRKKKKKKKKKKRKKRKKKRKKKRKKKKRKKRKRKKKKKKKRKKKKKKKAKKKKRK 


THE FOLLOWING ARE QUESTIONS 
FROM 
'' STUDENT PILOT FLIGHT MANUAL " 


oe Oe Ob OF OF OF 
oe Ob OF OF 
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* * 
KAKRKAKRKAKAKKKKAKAKKKRKKKKAKRKKAKRKAKRKKRKKAKRKEKKRKRKAKAKKAKRKKAKRKAKRKKAKAKRKAEKE 


" press any key to continue " 


KRAKAREKRKKKEKKKRKKKKRRKRKRKRKAKRRKKRKRARKRKRRRKKREKRRREKRRRKRRRRKRRRKAKRRERKR 


" STUDENT PILOT FLIGHT MANUAL "' 
SELECT ONE OF THE FOLLOWING 


* * 
* * 
* * 
* * 
* TYPE 1l..... for PART - ONE * 
* TVPE Zee. for PART - TWO * 
* TYPE 3......for PART - THREE * 
z VER aOee oon for SELECTING-ANOTHER CONCEPT * 
* * 


RREAKRKKRKKERKKKKRKKRKRKKRKRRRKRRRKAKRKRKRKKRRRRRRKRKRRRKRKRRRKRKRRRKARERE 


RAKKKKKAKKAKKKAKKAKAKKKKKAKKKKRKKKKKKKKKKKKK 
* x 
‘ THIS IS THE BEGINNING OF THE LESSON * 


x 
KRREEKKRKRKRKRKRKRKRAKRKRRRKRRKRRKRKRRRKRKRRRKRRRRRKRRRKRE 


"press any key to continue " 
Mmeoarch one of the following statements is corréct concerning "torque" 


GoOrrections (U.S.-built engines)? | 
ieee lit caeclimoje tert mugger loemecessary to keep the airplane 


SE el hie 

ee € rei right rudder is necessary to keep the airplane 
strai ; 

seen dive right rudder is necessary to keep the airplane 
straignt. 

ee When Borat is added abruptly, the airplane will tend to 


roll €© the aione. 


Your answer is L 
* You are wrond. ansuer ie >. * 
You are wrong, answer is Z 


2) Which one of the following statements concerning the Four Forces 
1s correct? 

1.....In straight and level flight, all Four Forces have 
equal values. 

Zt iete in qeetimoe, lift is cates than weight. 

Ss seers In straight and level unaccelerated flight, thrust is 
Crecdtenu ta anmatecian 

Gt) dees Dehoemateuldr sto the relative wand, whether 
EicmeeD lanes climbing, flying, flying straight and 
level, or gliding. 


Your answer is 4 
* You are correct x 
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(x removed question 3 through question 13 *) 


14) You have just completed the run-up. Just before starting to taxi 
into the take-off position, you realize that the fuel gage shows 
the tank you-ran up on is very low in fuel while the other is 
nearly three quarters full. You recall this was that the case when 
you visually checked the tanks, but you forgot to put the selector 
on the fullest tanks. You_ should | 

1.....switch tanks=and continue Seber varmcsork. 

2....ekeep the airplane on the tank you did the run-up on and 
go ahead and take-off. . 

3....-switch tanks and run the engine up to at lease 1500 rpm 
pee : minute or more, or redo the mag and carburetor heat 
check. ; 

A irae do none of the above. 


Your answer 1s 3 
* Vai aro rnarrocr x 
You are correct 


number question in critical set = 14 
number correct answers = 13 
number incorrect answers = £1 

The probability of your ability is = Bie shsls 


You have not yet completed all the questions. 
You will now.be evaluated on what you have done so far. 


THERE ARE 45 QUESTIONS. 
14 Critical questions. 
16 complementary questions. 
15 supplementary questions. 


you have completed only the Cust sces questions set. 


correct answers a 
incorrect answers = 


' YOU ARE ABOVE AVERAGE, EXCELLENT! " 


*x * Be careful onpecey questions! ** . 
You have done 1 mistakes about physical question. 


KRREKRRKKRRRRRRRRRRRRRKRRRRKRRRRRKRKRKRRRRRRRRRKKEER 


* * 
* YOUR KNOWLEDGE IN THE PREVIOUS LESSON * 
IS SATISFACTORY * 
= YOU ARE FINISHED WITH THIS LESSON * 
KRKKAAKAKKARAKAKAKKARAKARAKARARKAKRAKKRRKKRARRKRRKE 


" press any key to continue " 


KREKEKKKKRRKKRKKRKRRKKKERKRKKRRRKRRKRERKERE 
* * 


* THIS IS THE END OF THE LESSON * 


a4 


sil 


* * 
KRREKKKKKKKKRKKRKKRRRKKRKKRERKERERERARRRARKK 


IeDLess any key to Continue " 


KRERKKKERRERKRKKRKRKERERKKRKRRRRKRKRKRKRRRKRKKRKRERKERRKRKRERRRKKKRKRK 


* 

: DO YOU WANT TO SEE THE RESULTS 5 
a YES PRE So eeole. Wey o * 
° NO PRESS =. No : 
KAKKAKAKKKAKKKKKAKRKKKRAERKERARKERERRKKKERERKKERERKKKRKAKKK 


RKKEKKARRRAKKA AKA RAKEAKAKK RAK RE RKARKR REAR RRR KARR ARR RRA RR 


DO YOU WANT TO CONTINUE 
ONSTHE SELECTED CONCEPT? 


x 
x x 
x x 
x * 
“ PRESS "' ANY KEY " to continue a 
: on the selected concept zs 
a PRESS "N" to select another ‘lesson Zn 
x or go to exit * 
x x 
x x 


KRRRKAKRKKRRKRKRKRRRRRRRRRRRRRRRRRRRRRKRRRRKRRRRRRRRRRRRRRRKRK 


KKKKKKRKKKRKKKKRKRKKRKAKRKKRKRKEKRKRKKRKRARKRAKRKRRRKRRARRAKRKRRRKREKK 


: PLEASE SELECT ONE OF THE FOLLOWING - 
3 Loe SL UPENT ee LOLS PLIGHT MANUAL ; 
: Geiss - sh Rivaie FrELoOr STUDY GUIDE e 
_ Sere NSIT RUMENT BLIGHT RULES : 
: Oye...cor " OUMT “ (exit program) : 
: (Type only number you want ) ; 
KAKKKKKKRAKKRRARKKAERARRKRAERRERAERRERERRAERRERERRERRERKRAKEK 


REKEKKKRKERKAKRKRRRRKKRRRRRKRRKRRKRRRKRRAKRKARRKRKK 


* * 
a FINAL SECTION: x 
a SCORES AND COMMENTARY ’ 


KREKEKKKKRRRRKRKKRRKRREKRKRRRRKKRKRRRRRKKKARRAKERKK 


" press any key to continue " 
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cme ce ee ce ee eee Se ee ee es ee es ce es es ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ae oe oe ee ee ae ee ee oe 
SS See cee cee cme ee ee ee ce ee ee ee es es es es es es es et es ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee eee ee eee 


ce me me ee ce ces es es ee ee es es es ee ee ee ee ee ee ee ee 2 es ee et ee ee ee ee ee et oe oe oe eee eee 
=e Ge ee ed ed ee ee ee ee ee es ee es es ee es es ee es es ee ee ees ee et ee ee ee ee ee ee ee ee oe eee es 


" STUDENT PILOT FLIGHT MANUAL " 
"PART - ONE" (Before Flight) 


THERE ARE 45 QUESTIONS. 
14 critical questions... 
16 complementary questions. 
15 supplementary questions. 


you have answered only the oon bce rete geno set. 


Total correct answers = 
Total incorrect answers = 


' YOU ARE ABOVE AVERAGE, EXCELLENT! " 


Your last test was on LOCMAY Sg92a7. 
And the grade was Sle. 
Your grade today was 92.86. 
Good, you are improving! 
Following is a report of your performance 
The Airplane and How It Flies 
Pts = l, Total = 2, Percent Grade 


Cockpit: Instruments and Systems 
Pts = = 


Soe 


00 


35 Total = 3, Percent Grade = 100.00 
EE ase Check 
ts =) ie Total = 1, Percent Grade = 100.00 
Starting The Airplane | 
Pts = 3, Total = 3, Percent Grade = 100.00 
Panes 
ts = 3, Total = 3, Percent Grade = 100.00 
Pretake-off or Cockpit Check 
Pts =a, Total = 2, Percent Grade = 100.00 
X YOUR PROBLEMS AND SUGGESTIONS FOR IMPROVEMENT ~~ 
Question about Procedures: 
Pts = 5, Total = 5, Percent Grade = 100.00 
Question about Calculation: 
Pts = 1, Total = 1, Percent Grade = 100.00 
Physicals questions: 
Ptss= 7 Total = 8 Percent Grade = S700 


You should review as follows 
1)'Torque' see chapter 2 ,fig. 2-9, SPFM. 


xx Be careful on easy question! ** 
You missed 1 of them in the total of 4. 


KEKKKKKKKKRKEKKERKKKKEKKEKKKKARKKKKKAAKAKE 


* * 
a HOPE TO SEE YOU AGAIN : 


KREKKKKRKKKKKRKAKEKKKKERKKRKKKEKRKREKREKEKK 


» execution ends 
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APPENDIX C 
DEMONSTRATION OF WEAK-STUDENT PERFORMANCE 


RARRRARRRERRRKARRRRRRRRRRRRERRRRRRKERRRRRRKRKERRKKERKRKKKKKE 


WELCOME POS HE (FIELD OF AVIATION 


A OO Ft 


x 
x 
x 
* 
x 
KKAKKKKKAKAKKKKKKKKKKKAKKKKKAKKRKAKAKKKKAAERRRAKKRRKAAERRKKKKAKE 
please type your number 

our name ? 

oday date,(ex. 10 Apr 87) 

Beoeoss enter to continue” 


RARAERKRKERKAKKKKRKERKERKKKRKRKKKRRRRERKRRRKRKERKEREREKRRKRKRRRRREK 


PLEASE SELECT ONE OF THE FOLLOWING 
iL oieieiene STUDENT PILOTS FLIGHT MANUAL 
Zien PRIVATE PILOT STUDY GUIDE 


So.e-. INOLRUMEND FLIGHT RULES 
Cree. fore OULT (exit program) 


* 
* 

x 

* 

* 

x 

* 

* 

* 

* 

* 

(Type only number you want ) ‘ 
* 


+H tHE AE Ba t 


REKRKEREKRKRRKRKRRRKKRERERKERRKRRRKRKRRRKEKRRRRRKKRERKERERKARRRKERE 


RAARKKKKARKRKEKRRKRKRKRKRKRRKRKRKRKRKARRRRRKRRRRRRRRRREKRRRRRKRRRRARKRRE 


In each test which you will work on :- 


x 
x 
* 
x There are 3 sets of questions. ee 

5 Bach set as difterent inmiievel of difficulty 
x The most difficult set will be presented 

ee Pins eanGeeVenmcncenNextmiwo Sets. 

4) You will be evaluated after completing each 
* 

x 

x 

x 

~ 


WN 


Or eenemr tho telWOmseteOrequesl Ons, —. 

5) agke you are about average, all questions 
will be presented, otherwise you do not 
have to do all of the questions. 


a a 


RREEKKKKKRERRRKAKRRKRKRRAKRKRRKKRRAKRRRKEKRKRRERRRRRREARRRRRERK 


" press any key to continue " 


KRERKKKKRKKEKRKARKRRRERRRKRRRRRRRRRRKERRARERRERERERRRRRRKRRKKRKK 


THE FOLLOWING ARE QUESTIONS 
FROM 


OO oO Ot 
+ A Ft 
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" STUDENT PILOT FLIGHT MANUAL " * a 


* 
KREEKKKKKKKKKKRKRKKRKEKRKRKRRKEREREKRRRKRKRRAKRRKRKRKAEKRKRKRKRKRRKRKAKKRKKK 


+ oF FOF 


" press any key to continue " 


KRERKKRKKKKKRKKKKKKKKKRRKRRRKRRKRRKRKRKRRKRRKRRKRKRKRKRKRKRKRRKARRKRAREKRKRE 


* 
x ' STUDENT PILOT FLIGHT MANUAL ! * 
S SELECT ONE OF THE FOLLOWING 
* TYEE) 1.2 for PART - ONE * 
* TYPE 2s for PART - TWO x 
* TYPE  3o0cs58 for PART -. THREE * 
ei TYPE O..... for SELECTING ANOTHER CONCEPT _ 
KKKKKKEKKKKKEKKKAKKKRKKEKAKKKKKRRKRKKRRKEKRKREKRARRERARRRKAKERE 


KREKKKRKAKRKERKRKRKEKRRKRKREKRKRRERRRRKKRKRKRKRRRKAKRKRKRKRKRKEK 
* * 


: THIS IS THE BEGINNING OF THE LESSON ‘ 
RAKRKAKKKKAKRRKKRKKKRAKERAKEKRKAKKEKRKKAKKKKRRKK 


1) Which one of the following statements is correct concerning "torque" 
corrections (U.S.-built engines)? 


ete tres ine ws left rudder is necessary to keep the airplane 
strai : 

Z ape In a climb, right rudder is necessary to keep the airplane 
Str ace a . | . 

Sueraere In a dive, right rudder is necessary to keep the airplane 
straight 


4.....When power is added abruptly, the airplane will tend to 
roll to sthie =sidhe- 


Your answer is il 
X UA (oe 65 eae oe 
x You are wrong, answer 1S Z 


(* removed question 2 through question 13 *) 


14) You have just comp Teese the run-up. Just before starting to taxi 
into the take-off position, you realize Cham the fuel qagesshows 
the tank you ran up on ts very low in fue! whilesthe cener ts 
nearly three quarters full. You recall this was that the case when 
you visually checked the tanks, but you forgot to put the selector 
on the fullest tanks. You should 

..sWitch tanks and continue the take-off. 
Z2.....keep the airplane on the tank you did the run-up on and 
go ahead and take-off. 


Sia elena switch tanks and run the engine -up to at lease 1500 rpm 
eee minute or more, or redo the mag and carburetor heat 
chec 


4544600 none of the above. 
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Your answer 15s 3 
en yn a en ance as oe 
You are correct 


number question in critical set = 14 
number correct answers = 2 
number incorrect answers = 9 

The probability of your ability is = 0.178 


You have not yet completed all the questions. 
You will now be evaluated on what you have done so far. 


THERE ARE 45 QUESTIONS. 
14 critical questions... 
16 complementary questions. 
15 supplementary questions. 


you have completed only the critical questions set. 
COrrecesanswers = 5 
incorrect answers = 9 


" YOU ARE BELOW AVERAGE IN THIS PART " 


* * Be careful gay easy quest rons | 94% 
You have made 3 mistakes about physical question. 


KEKKKAKKKKKKKAKAKKKKKEKRKRKRRKAKRKKEKERERERKRREREKREKRKKKKI 


ke 

* YOU ARE WEAK FOR THIS LESSON 

: STUDY"'PART - ONE" (Before Flight) AGAIN 
* 
“s 
* 


YOU ARE FINISHED WITH THIS LESSON 
KAKKKKKKAKKAKKKKEKKAKEKKAREKAREKARERKAEKKKAK KA 


OO OR REF 


" press any key to continue " 


KREKKKAKKKKKRKKKKKRRRKEKKRKRKRRKKKAKRKRKKKKK 
* * 


i THIS IS THE END OF THE LESSON ‘ 
KAKKAKKKKKKKKKKKAKARKKAKEKKKKRRERK KAKA 


KKEKKKKKKKKKKRKRKKKAKRKKRKAKKAKKKEKRKAEKRRRKRERRRRRRRRRERRKEREKRKKI 


DO YOU WANT TO SEE THE RESULTS 


* * 
* * 
* * 
‘i YES § PRESS " ANY KEY " x 
x NO PRESS " N # x 
* * 
* * 


KREKEKKKKKEKKKKEKRKKKRKRKKRKKRKKRKKKKRKEKRKKKRKERKEKRKERKEKRKRKKKKAKKK 
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KREEKKKKKEKKKRKEKEKKKKKKRERERKRRKRRKREKRKRKRRKRRKAERERKEKRERRERRERARE 


, DO YOU WANT TO CONTINUE * 
: ON THE SELECTED CONCEPT? . 
x PRESS " ANY KEY " to continue * 
‘A on the selected concept z 
* PRESS "N " to select another lesson * 
: or go to exit i 
KRIKKKKREREKARARARKRKKKAEKARKKAKEKRKKARIERARERE RR RKKEKERERER 
:n 
RAKRKAKKKAKKKAKKKKKKAKAAKAKKARKAKAKKEKARARRARA RARER RERERER 
* PLEASE SELECT ONE OF THE FOLLOWING - 
i deere eae STUDENT PILOTS FLIGHT MANUAL 2 
ZeseesPRIVALE PILOT STUDY SGUrDE zs 
- 3 sae INSTRUMENT FLIGHT RULES : 
: Omraeu for" OUT (exit program) : 
A (Type only number you want ) ‘ 
4 KAKKKKAKKRKARKAKAKKAKKRAKKAARAKAKAKRKRARARARARAARARARKKRA 


KREEKKEKRKEKRKAEKRAKEKRREKEKRKREREKREREKRKRRKRKRRRKEKRRRRE 


i FINAL SECTION: a 
: SCORES AND COMMENTARY is 


KRREEEREKREREREKRRERKERERERERERERRERRRREKKR 


'' STUDENT PILOT FLIGHT MANUAL "' 
"PART - ONE" (Before Flight) 


THERE ARE 45 QUESTIONS. 
14 €ritical quesciens. 
16 complementary questions. 
15 supplementary questions. 


you have answered only the critical questions set 
Total correct answers = 5 
Total incorrect answers = a 


" YOU ARE BELOW AVERAGE IN THIS PART " 


Your last test was on 15 MAY 1987. 
And the grade was 92.860. 
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mour grade pocay Wace S011. 
You are weaker than last time,"Study harder"! 


Following is a report of your performance 
The Airplane and How It Flies 


Pts = 0O, Total = 2, Percent Grade = 0.00 
Cockpit: Instruments and Systems 

Pts = l, Total = 3, Percent Grade = ass 
Preflight Check 

Pts = l, Total = 1, Percent Grade = 100.00 
eee stng The Airplane 

Pts = 1, Total = 3, Percent Grade = 33235 
port Lng 

ts = l, Total = 3, Percent Grade = S335 

Pretake-off or Cockpit Check 

Pts = ° otal = 2, Percent Grade = 50.00 


* “YOUR PROBLEMS AND SUGGESTIONS FOR IMPROVEMENT * 


Question about Procedures 
Pes = 3, Total = 5, Percent Grade = 60.00 
You should review as follows | 
Piece Clap tower croc srlying the cross country’. 
2)'Accidentally turning magnetos switch of during run-up’. 


Question about Calculation 
Ets —- ©, Total = 1, Percent Grade = 0.00 
You should review as follows 
1)see chapter 3, 'Rule of Thumb', page 134, SPSG. 


xk Study more! You are weak here. ** 


Physical Questions 
Pts = 2, Total = 8, Percent Grade = 25.00 

You should review as follows 
Stemcque “See Cidpter 2 ,£10. 2-9, SPEM: 
‘Four Forces' See chapter 2, mene Zor or or 
'ANDS', p.45 (SPFM) and Bane ete 8 (SPSG). 
Poaimen svocem., Fig. 23-1/,SPFM.- 
Proceso tadytaplhoceaure’ , in Chapter 5, SPFM. 
6)'study technique of taxling in a strong wind.' 


xx Study more! You. are weak here. ** 
xx Be careful on easy question! ** 
You missed 3 of them in the total of 4. 


U1 GIN 


KAKKKKKKKKAKKKKRKAKKKKKKKKKKKKKRK ARR 
* x 
i HOPE TO SEE YOU AGAIN 


KAEREKRKEKRKKRKRRKEKKRRKKRKRRKRKRKRKRKRKRKRKAAKKEKRKRKK 


.-execution ends 


Si 


APPENDIX D 
PROGRAM LISTING 


paogken Testing(input,output) ; 
*$ 200000 * 
KEKKRKKKRKAKKRRKARKKKRKKKKKAEKKERAERKEKKERAAKKKRARRRRAKKRKRAKAK EK 


* TITLE : PILOT_TESTING * 
* AUTHOR : CDR Yodchai Rugsumruad 2 
: Date Written : 1 Apr 87 - 20 May 87 i 
* Version : One s 
* Svstem Used : Waterloo Pascal on NPS mainframe x 
x T/O Sources : Data input from secondary storage a 
i es and user input from terminal keyboard zm 
* Description : This program demonstrates an intelligent * 
* CAI System for testing, evaluating, and * 
* " recommendation the pilot. z 
KAKKAKKAKKAKKAKKKKKAE RAK RAK RK RAKE K EKER AK RKKAKAKEKEREKKKKKKEKE 
(x GLOBAL CONSTANTS * ) 
const 
maxchar = 72; * for read 1 line of char *) 
maxcomment = 60; * for store comments in array *) 
maxchap = 10; * Number of chapter to test *) 
uninformed = 0.5; * Uninformed Opinion * 
expert = 0.7; x Expert Opinion ~) 
lowweight = 1.0; * low level of confidence a 
highweight = 4.0; * high level of confidence *) 
alpha = 0.9; Max Gue-Offi@mdecilam. 
beta = 0.4; * Low cut-off Criteria * 
maxbook = 10; * Max number of book to test *) 
Maxpart = 10; * Max number of chapter or paneaee each book *) 
maxarea = 10; * Max concepts in each chapter or part * 
maxcat = 3; * Max categories or types of questions * 
maxproblem = 25;(* Max comments in each type of questions *) 
type 
ts = packed array(.1..maxchar.) of char; 
chap = record 
NUM since ger: 
count, 
correct, 
wrong, 
block, 
Cret, 
PErle, 
WEhit, 
comp, 
rcomp, 
wcomp, 
sup, 
rsup, 
wsu integer; 
“ends aeeChape 
chapquestion = packed array(.1l..maxchap.) of chap; 
board = record 
flagl, 
Plage. 
flag3 : boolean; 
ex, 
av, 
OOn i fal, 
eaee (x Benn *) 
blackboard = packed array(.1..maxchap.) of board; 
suggest = record 


32 


var 


number : integer; 


trob : ql; 
ade= cee ae 
end: 
chapcomment = packed array(.1..maxchap,1..maxcomment.) of suggest; 
topic = recor 
name : vi 
fname : boolean; 
end; 
peeeeype = packed array(.1..maxbook.) of topic; 
subpar = recor 
subname : a 
fsub : boolean; 
end; 
parttype = packed array(.1..maxpart.) of subpart; 
areainfo = record 
name : ql; 
COUntc, 
wrong, 


correct : integer; 
flag : boolean; 


end; 
areatype = packed array(.1..maxpart,1..maxarea.) of areainfo; 
blockarray = packed Saat ee nan cnen of integer; 
countcomment = packed array(.1..maxchap.) of integer; 
commarray = packed array(.1l..maxproblem.) of ql; 
problems = record 
Hames aL: 
flag : boolean; 
count, 
SCmnec ly, 
wrong, 
easy, : 
wasy : integer; 
comm ;:; commarray; 
end; 


problemtype = packed a yc te emaxcats | of problems; 
nametype = packed eerey meee of char; 
datetype = packed array(.1..15.) of char; 


(* GLOBAL VARIABLES > 


block : blockarray; 
next : boolean; 
rec : blackboard; 


continue : boolean; (* for beginning or stop of session *) 
comm, 

question : ql; * for reading a line of question *). 
eonnectans, x for reading correct answer from file *) 
answer, * for reading answer from screen *) 


ans, e answer y/n from screen to begin session *) 
symbol : char; * symbol in file *) 

enoose =: boolean; 

aynumd, ri eee 5 ANE Seis 
Filel, file2, file3, file4 : text; (* text files of questions *) 
chapter : chapquestion; 

comment : chapcomment; 

numcomment : countcomment; 

Peok =: char; 

b : integer; (* indicate number of concept *) 

books : booktype; 

part : parttype; i record any part in a book *) 

area : areatype; (* record every concept in a test *) 

meds, :. LNEeGela 

xX : real; (* for percent grade *) 

problem : problemtype; 

p,m,n : integer; 

cats : char; (* char represents question category *) 

ediues SNLegen- 

pilotnum: integer; 


a5 


pilotname : nametype; 

pllotdate =: datecuype, 

perp testi ec real; 
estnum : integer; 


name 


: nametype; 


todaydate : datetype; 
TLOGCE = Text. 
empfile : text; 


(RARKRKKARARKRKRRKRKA RK 
* 


Procedure Initializevalue 


kX This procedure initializes value of global variables in the 


KREKKKKKKKEKEKRKEKEKKRKKRKRKKRKRKKKKKKAKKKKEKE 


KREKRERKKKEKKRRKRKKKKRKRKKKE 


procedure initializevalue; 


var 
eee 

begin 
ans 


book := : 
:= true; 


next 


for 41 


: integer; 


f 
ieeraleue 


:= 1 to maxpart do begin 


chapter(.1.).num := 0; 
numcomment(.i.) := 0; 


chapter (. 2. muni 0; 


chapter(.1 Counc O; 
chapter( 222) .eohmeces.— cr 
chapter(.1.).wrong := 0; 


rec(.i.).flagl := false; 
rec(.i.).flag2 := false; 


books(.1. .fname := false; 
Sel erent ur toate nee ss! ot, 


.fsub := false; 


y part (sa. 
end; 
for 1 := 1 to maxpart do begin . 
for j := 1 to maxarea do begin 
area(s 2,7). name ge sae 
areal. i, 1. ).COUnEe seer 
aréeda(.1 3.) -wrOnds:—s0) 
area.) ieeco: eC ce toau: 
area(.1,j.).flag := false; 
end: 
end; 
areas := 0 
area name 'An Introduction! ; 


area 


ow 
ry 
@ 
ro) 
se RPP ppp 


Ene vale Ladnesaqnd How ol Gen lec 
‘Cockpit: Instruments and Systems'; 
NPreflight Check’; 

starting The way r pl dine, 

'Taxling' ; 


SOULE WHR” 
po 
m 
a 
@ 
und duu 


~ is» «®a *® 8 8 ® 


are F name 'Pretakesotf or Cockpmewenccma 
X35 
for 1 := 1 to maxcat do-begin 
problem(.i.).flag := false; 
prebllem(.2-).count.:— 0- 
problem(.1.).correct := 0; 
problem(.1.).wrong := 0; 
problem(.i.).easy := 0; 
problem(.i.).wasy := 0; 
for j := 1 to maxproblem do 
problem(.1.).comm(.3:)mee= eee 
end; (* for * 


problem 


p:=0; n:=0; 
broblen\:2-) name 
problem 


s=O0; m:=0; comm := ' '; 

' Question about Procedures'; 
' Question about Calculation’; 
' Physical questions' ; 


ee 
one 


-nhame 
-nhame 
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KRREEEEKKKEKREKRKEREKRKEKRKKRKEKRKRKRRRERERKRKRKKKRKKKEKRKRKKRKKRKKKK 


end; 
(KAKKRKAKAKKRKRKAAKKRKKAKKARKAEKEKKAEKKRKERKARKKK RK RKERKRKRRKRKKRKKREKR ARK EKKRKRK 
* 


Procedure Space | = 
* This procedure is called to space between lines. * 
fete ek KKK RRA ARKRERKRKKRRKRKRERRERRRRERREE 


RAKRKKAKKKRKKKRKAKKKEKKRKKKKKKK KKK ) 


procedure space( a:integer); 
var | 
i: integer; 
begin 

ro) gael 1 
2 


== Cond cdo 
writeln; 


il 
end; 


(RAKRKKAKKKKKAKKK KK RK AKA RAK RARAKK KKK KA KKKAKKKRKARKRKRK RK AKKKAERKRKRRERKRKE KK 
* 


. Procedure Clearscreen = 
* This procedure is called for easy going to the next page. * 
KAKKRRKKKKKAKR ARK RK RK KKK ERE RAK KEKE RAKE RRA RRR RK EKA KER KEKKKKKKRKRKKAKKRK 
Beeecaure cléearscreen; 
egin 
space(2); | 
writeln(' " press any key to continue " '); 
readin; 
page; 
end; 
Becedure pilotinfo; 
eqin 
writeln('please type your number'); 
readin(testnum) ; 
writeln(' your name ?'); 
readln(name) ; 
writeln(' today date,(ex. 10 Apr 87)'); 
readin(todaydate) ; 


end; 
rocedure welcome; 
egin 
space(5); 
WEL!) LN ( | RAAKAAAAAAAKAAAKAKKAKAKARAKKRK AK KER AKRERKKRERKRERKERKRE | 266) ; 
writeln( '* aco); 
writeln Ix *' 366); 
mete in( | * WELCOME TO THEeeleLD OF AVIATION AAVsG.G)) 
writeln('* 7S sna; 
writeln('* *X' 366); 
WLLL] Ln ( | KAAAAAAAKARAAKAKAKAKKKRAKKAKKARKAAKKARAK AKER AKER REKKRE | 66); 
space(1); 
Dibotinto; . 
writeln(' "hit enter to continue'''); 
readin; page; 
end; 
(KEKKARAKKRKAKAKAKAKKAEKKKKKERK RK KAR KK KKK KKK AK AK RKKKKAKKKAAKK RARKAKKAEK EK 
*g . Procedure Information : s 
$3 This procedure provides information to the student of how 


RARRKKRAKRKKKRKKKKRKKRKRRKRKKKRKRKRRKRKRKRRRRRRRRRKRRRKRRKRKRKRRKKRRKKRKKKRKRRKRKRKKRE ARK 


k 
*X the questions in each test is made and what will happen during test * 

B Dicken ) 
rocedure information; 


agin 
Fe CREE EH RK ERR Lik kRKRIRKARKIIIGE) 166 , 
wearein('* *' 366); 
moaceln('* In each test which you will work on :- Oo) 
Wate in('* OO) 
Writeln('* 1) There are 3 sets of questions. _— pesoou 
writeln('* 2) Each set is different in level of difficulty *' :66); 
writeln('* 3) The most difficult set will be presented OG 
wigmee in( '* Elias ceancmenen tmemnext two sets. EGG); 
writein('* 4) You will be evaluated after completing each *' :66); 
Piademr = o£ the first two set of questions. | acO0 jy 
writeln('* 5) If you are about average, all questions k' 366); 


writeln('* will be presented, otherwise you do not *' 366 
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writeln('* have to do all of the questions. :66 


writeln('* ede ; 
WELLE LT (  RAAAAKAAKAKAAKAKAARAKAKAAKAKRAKAKAKRAKRKERKEKERERERKER 66 ) 
clearscreen; 

end; 
( RII I IIR RRR RAI IIR ICI AIA I ITOH ST Tala a la a 
Procedure Selected_book x 
, This procedure determines the book that se eeeee by the x 
x student to provide questions from that book(con ep ds x 
Stee KAAKKEKKRKKKKRKRAKRERKRKEKKERRKRKK ee AAKAKKAKARKA ) 


procedure selected_book(var con : boolean); 
var flag : boolean; 

begin 

oe false; 

while not flag do begin 

readin(book) ; 

if Seek = it then begin 


books ( ‘'b. ).name := '" STUDENT PILOT FLIGHT MANUAL "'; 
ag := Pyne con := true; 
boo s(. b.).fname := true; 
€ 


else a Ese '2' then begin 

fiag os eee con := tru 

boo s{-b wname :=! # PRIVATE PILOD ShUDY =CULDE 
genes b.).fname := true; 

Bee a i ‘2 thenwsegin 


fiag He See con := tru 
Ss 


boo {-b -name := ! EMPTY FILE { te 
books(.b.).fname := true; 
end 
else if (book = '0') then begin 
flag := true; con := false 


end 
else begin 
writeln(' "only number please" '); 
flag := false; 


end; 
end; 
end; 
(RAARHAREAARRIRA RH ARA RR SADR RA RRA REAL RA cae 
Procedure Booklist * 
, ee pneceanre displays menu of the booklist for student e 
x lect which book he/she want to test u * 


KEEKKKKE = ERR ER RERANTRA EAR ORS AR SARTRE ERR RARE ATR ORRRRA AE RIR RIA) 
procedure booklist(var con:boolean) ; 


begin ° 
space(2); 
writeln | RHA RAKA RRA AAA ARARRAERR ER AEREIER REREREA EERE ER ERRRERERE 36 6 
writeln('* x ed 
WELGelgu = PLEASE SELECT ONE OF THE FOLLOWING *' 266 
writein('* <i O6 


writein('* »»eSLUDENT PILOTS FLIGHT MANUAL oS 


i 
writeln('* Te 
Wea = 2 »ePRIVATE PILOT STUDY GUIDE eee 
Writein : 
Wig Cea He 3.....INSTRUMENT FLIGHT RULES Se 
writeln ; 
foe - Oise ec hOr ee CUE Cerise oicdaam) eines 
Whee cer : 
writeln('* Al, 
Se Ls (Type only number you want ) pee 


=e %e@ “e@ S06 “Se “6 Se Be Be Be BO Ze WH We We 


WLLteln( ! KAKKAAAKAAAKAAKAAKAKAKKKKAKKRARARRRARERERRARERARKRRERKRKE | 6G 


selecte ~Pook(con) ; 
writeln(':' ,book); 
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end; 
rocedure firstheading2; 


egin 

pene?) 
WELLE LT ( | AARAAAKAAKRAKAARA AK RARAKRAK AKA RAK RKRKAK AKA KARA RAKE GG) ; 
ea celn('* *' 366); 
writeln Ux THE FOLLOWING ARE QUESTIONS *' 366); 
writeln('* ed (SIS) Ee 
writeln('* FROM TG) > 
writeln('* Bey) ; 
weiteln a ll PREVATE, PILOP STUDY GUIDE." *':66); 
writeln('* *X' 366); 
writeln('* *' 366); 
WELte ln AXAAAAAKAAAAKAAKAKRKKRAKR AK RKAAK RRR RAK K AKA RAK ARAKI GG) 
clearscreen; 

end; 

pageedure firstheadingl; 

egin 

space(5); 
WELLE LT ( | KXAAAAKAAA AAA AK AAA ARKAA KAKA RAK RAR AKER AK RAR RAK RKRAKRARRK 66) 5 
writeln i *' 366); 
writeln('* THE FOLLOWING ARE QUESTIONS *' 366); 
maLtein('* pee oo 
writeln('* FROM *X' 366); 
writeln('* *' 366); 
woeiteln<t '* " STUDENT PILOT FLIGHT MANUAL '"! *' 366); 
wratelni"'* *' 366); 
writelin( '* *' 366); 
WOLCO LN ( | KAAAAAARAKAK AAA AR AK AKR AKA RAK KK ARK KAKA RAK KR AER BG) 
clearscreen; 

end; 


KREKAKKKKKKKKKKKAKKKKKEKKKKKKKKRKKKRKKRKKRKKKKKKKKRKKKKKAKKRKEKKARAKKKKRKRKKERKAKKKKKKR 


Procedure Beginsessionl __ . x 
oS This PEageeure calls procedure booklist, information,and | x 
firstheading, passing boolean continue for begin questioning ze 


or back to select another concept or quit, 
KRAKKKKAKKRAKKRKKKKKK KKK K KKK KAKA KEK KR KKK K KR EKKRKKRRAKKAKEKKRRKR AKER ) 


procedure beginsessionl(var continue:boolean) ; 


var 
_ £1, flag : boolean; 
begin 
f= crue; 
booklist(continue) ; 


while £1 do begin . 
1£ book = "1' then begin page; 
information; 
apo ees fl:=false; 


en 
else if book = '2' then begin page; 


information; 
Boe nc coamae thts Ealsey 
en 
else if book = '3' then begin page; 
fl := false; space(7); 
writeln('! THERE IS NO CONCEPT TO TEST HERE'); 
space(4); 


clearscreen; 


end 
oe eats book = '0' then begin page; 


>= false; 
continue := false; 
end; 
end; 
end; 
RAKRAKKAKRAKAKKKK AKAKAKAKKKKARAKAKAKKKAK RAK AEE RARER RERAKRREKEKRIKREREKKKRKKKK A 
Procedure Continuesession z 
2s This procedure displays screen to ask whether or not the * 


a 


zx student want to continue testing on the same or different : 
x concept. 
FoI ICA ICCA I RR IO IOI TOR TOI ITOK TOT TR I TORII IRR IR IAA IRI IKI TIT IKI) 


rocedure continuesession(var cont:char;var select:boolean) ; 


egin 
Se Ce OD Fa jeiciioinin ici i I Aca IIA a II ROR ge : 
writeln('* *' 366); 
writeln('* DO YOU WANT TO CONTINUE *! 366); 
writeln('* ON THE SEEECTED CONGEPT? *! 366); 
writeln('* xt Gay 
Wra tela PRESS " ANY KEY " to continue “Gene 
writeln('* on the selected concept x! 366); 
writeln('* *' 366); 
writeln('* PRESS "N " to select another lesson *' 366); 
writeln( '* or go to exit *' 366); 
writeln('* x! 366); 
WEL tE Ln ( | KAKAAAAAAAA AAR AR AR AAA RAKA RAR AKA AAARAKAKARARAKAARARE RE | GG) 
readln(cont); 
writeinw =" contr 
page; , 
1f (cont ='n') or (cont = 'N') then begin 
select := false; 
next := true; 
end | 
else begin 
select := true; 
next := true; 
end; 
end; 
RRA NRARAKARRARKAD RARKAKARAKRAARKARARARKAKRARARKKRERERK RA RKKRAREKRAAKRERK 
Proceduye -Galeulcte tl aa wa = 
x This precequne calculates propabs Trance student ability afters 
* completed the critical set of questions. This procedure is called * 


* by procedure east ay duc eeu values are passed in/out, for example* 
* number of correct answer questions done, and incorrect answer. * 
AKKRKKAKKAEKKKK ARK KKK KKK RK AREA AK KKK KKKK ARK AKKARKAKKARAKKKAEAK KKK ) 
procedure calculatel(chap:integer;cor:integer;wro:integer;cou:integer; 
var prob : real;var ml:integer;var rl:integer); 


var 


pu,px,a,b,x,y,2Z,d,e : real; 
1, Wi? 2Neeger. 

begin 

ml 


: chapter(.chap.).crit; 
Y 


GOr: 

wl := wro; . 
Shae e cee ea 
Chapter(.chap.).werit 


it 


CoOL; 
WEO- 


space(5); . oo 
wraiteln(' number question in critical set = ', ml:3); 
writeln(' number correct answers = ',rl1:3); 
writeln('! number incorrect answers = ',wl:3); 
(* calculate P(A1/BU) *) 
pu := uninformed; Re = expen 
a Foe := highweight; 
:= > xX 3= : 
if {(Cou-cor)) <> 4 then begin 


for 1 := 1 to (cou-cor) do 
X 3:= x ~ (iepupe 
end (*if*) 
else xX := 1; 
Yi:7 1; , 
1f (cor <> 0) then begin 
for 1 := l tomcor do 
y := * pu; 
end (*1f*) 
else y := 1; 


if (cou <> cor) then begin 
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£08 a := cou downto (cort1) do 


aL a; 
end on 
ies 


(* calculate Yay Bx) ¥} 
i 
if. ((eou" cor) {; * then begin 


value P(A1/BU) *) 


ror pe := 1 to (cou- cor) do 
a= x * (L-px); 
end (AEA) 

else x := 


1; 
fe (cor <> ) then begin 
for i := 1 to cor do 


: x; 
end (xi gry y*P 
else Macs ik 


Z 
if (cou <> cor) then begin 
for = := _cou, downto (cor+1l) do 
al: as 
end (#184) 
else hs is 
:= zh (* value P(A1/BX) *) . 


y_:= b/(a 
(* find #(BU/n Ve . 
pe fra Bas aoc e)) 
prop ;:= 


writeln y The probability of your ability is ye DLOb: 6-3); 
Sree reel Weliab) .reCrit := cor: 
chapter(.chap.).wcerit := wro 


end; (* end procedure ‘calculatel xy 
ca ALAA REARAARAAAEREA ARR KA 


REOceaure Ca leurabeZ 
a. This procedure calculates probability of student ability after* 
* completed the second set of questions. This procedure is called 
along gece cue Seek Gesttonge values ane passed in/out, for example* 
* number correct answer questions done, and incorrect answer. 
ee eer te etorireratederceaese sth tet seret ert reeees 
procedure calculate2(chap:integer;cor:integer;wro:integer;cou:integer; 
var prob : real;var m2: sinteger;var r2: :integer); 
var Sunoco, 2i,d,e.s real; 
i,w2,m3 : integer; 
begin | 





m3 := chapter(.chap.).comp; 
m2 := cou - chapter chap. neil e- 
r2 := cor ~ chapter(.chap. rerit; 
w2 := wro - chapter(.chap. .werit; 
chapter‘. .chap.).rcomp := r2; 
chapter(.chap.).wcomp := w2; 
space(5); 
writelin number question in complementary set = mons): 
writeln(' number correct answers = Y2s 
writeln(' number incorrect answers =a) Wl: 13). 
(* calculate P(A2/BU) *) 
pu := uninformed; ae := expert; 
oe Braceucrgnt: = highweight; 


1; 
if’ (i 72) <> 0) then begin 
for := 1 to (m2- EZ) ado 
:= x * (l-pu); 
end Cig 
a 
y := 1; 


Is 


Sh 


if (r2 <> 0) then begin 
for i := 1 to r2 do 


u; 
end cal gry y*P 
ore au := 1; 


os (na <> r2) then begin 


£Or =i := m2 downto (r2+1) do 
Z:= 1 Ze 
end (Aig*) 
else wee 


d: value P(A1/BU) *) 
(x calculate “YY ‘anyon 4 


ie ((m2- r2)_ a ‘0) then begin 
£or a := 1 to es EZ jdo 
:= x * (1-px); 
end (xi ER) 
else X := 1; 


Ye ( (pa <> 0) then begin 
for i := 1 to r2 do 
PA; 
end (xighy 
eaee y:= 1; 


1; 
ig. (m2 <> r2) then begin 
for a m2 downto (r2+1) do 


end (pm) 
else 


(x “find 2H * ) 
(* "find Agee ‘) 
4 atb 

(* “find é (BU/Al 


s= (xxq Ne * 
(* co Piei/aty a ey); 


; 


anes value P(A1/BX) *) 


rob := X 
eee The orobability of your raptor Be , DROb- Gra. 
reseeas .chap.).rcomp := cor - cHaeeea ap ees 
chapter ee wee die: 


Chap.).wcomp := wro = chapter 
end; (* end procedure calculate2 *) 
KAAAKAKARAAKARKRKRKKAARAKKRAARARARAR RARER ERA RRRARRARARARARKRRKERERKRKKKAKA 


Procedure Check_answer * 
* This procedure checks the student's answer. If the answer * 
* ae a eaae the error esac e will be given to the student to - 
* in the valid answer agai * 


eee SOAR ICRA TO DORI IR IR RATIO RA TORI TIA TIT I AIR IR IIR IIR RAI IIRK) 
procedure check_answer(var c : char); 
var 
_ flag : boolean; 
begin 
flag := true; 
while flag do begin 
ee (ee Soe 'Yor(c='3' )or(c='4') then 
lag := fal 
else begin 
writeln(' type again 1..to..4 please’); 
readin(c 
flag := true; end; 
end; 
end; 


ARAKKKKKKKAAKKKKKAKKKKKKKAKKKEKKKAKKRKKKAKRKKKKARRKEKERERERKEKEREREKKRKEKKKARAKKK 


Procedure Alter_cats * 
x This procedure will change the categories of question * 
A which is read from text file to integer type to be used as : 


the value in array of questions categories. 


60 


KARKKKAKKAKKAKKKKKAKAKAKKAKAAKKKKAKKAAKAKKAKAKKAKKAAAKKKAKAAKKARKERKAKAKRKR ) 
Boceaure alter cats; 


egin 
if cats = 'p' then cat := 1; 
if cats = 'c' then cat := 2; 
if cats = 's' then cat := 3; 
Bee city cane := true; 
problem(.cat.).count := problem(.cat.).count + 1; 
end; 
KAKKKKAKAKAKKAKKAKAKAKKARKAKAKKAKAK RAK ARK AKKARKAAKERARAAAAKKRARRKKRKKKKK 
Procedure Input_cat_comm . x 
* This procedure will read any comment of the question x 
* for every wrong answer made by student and then put each* 
comment in array of category which that questions belongs. - 
KAKAKK KKK KKK ER KK KKK RK EK KK RRR KEKKER RR RKEK KKK RAK RK ERK RAK KKK RRKRKAKKKKER ) 


Baeeccure input_cat_comm; 


egin i 

1f cat = 1 then begin 
p := p tl; 
Beat cel} comes es) s= comm; 
Egeoten .cat.).wrong := problem(.cat.).wrong + 1; 

en 

else if cat = 2 then begin 
m:=m +l; 
epee) cae) comm(.m: ) := comm; 
problem(.cat.).wrong := problem(.cat.).wrong + 1; 


end 
else if cat = 3 then begin 

nen +1; 
cee) co := comm; 
problem(.cat.).wrong := problem(.cat.).wrong + 1; 

end; 

end; 
KAKKKAKKKAKKKKAKKKAKAKRKRARKRKKAKKKRARARERARERRAKAARKRARERERKERRERKERKKAAKKKEKK 


Procedure Compare_answer ; 
x This procedure calls procedure check_answer to determine 
x student's answer is correct or incorrect and , count number of 
* questions done, correct and incorrect answer and also record | 
the comment of every wrong answer in order to provide suggestions 
* and recommendations in the final conclusions. 
RAARKKEKAKKAKKKAKKAKKAKAKKK RKKRAKKAKRKARKK AKER AAKKAR RARER AAKRKKRKKAKRKAKKA 
procedure compare_answer(var count:integer;var correct:integer; 
var Peete ceeny. a:integer;var filename:text; 
var chapt:integer); 


SOR OO Ob OO 


var 
symbol,ease: char;i:integer; 

begin 
readln(answer); check_answer (answer); (x from screen *) 
readln( filename,correctans); 
read(filename,areas); read(filename,cats); 
readin(filename,ease); 
alter_cats; 


if ease = 'e' then problem(.cat.).easy := problem(.cat.).easytl; 
area(.chapt,areas.).flag := true; 
writeln('! Your answer is ' answer); 


if answer = correctans then begin 
correct := correct +1; 
count := count + 1; 
chapter Pepe oomase := chapter(.chapt.).correct +1; 
chapter(.chapt.).count := pene eaee cee coun teal 
area gee ya ne soe qicoun := area pepe Ape e sy Count Seale 
area(.chapt,areas.).correct := area(.chapt,areas.).correcttl; 
problem(.cat.).correct := problem(.cat.).correct + 1; 
writeln(' 
writeln(' k “You are correct os 


writeln('! 


readln(filename, question) ; 


cléeansemeen, 
end(* if * 


=e “se ™S 
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else begin 


wrong := wee rae lee 

count := count + 1; 

Se ee een eee := chapter he R ea ee +1; 
chapter(.chapt.).count := chapter(.chapt.).count +1; 

a are te ecu := area oc paD eee ae ieee + 1; 
area(.chapt,areas.).wrong := area(.chapt,areas.).wrong + 1; 
writeln('! (ie 


‘ KOU Ne Te ee ee en Tn / 
writeln('! You are wrong, answer is ',correctans:3,'*':2); 
1 e 


writeln(! ); 
if ease = 'e’ then 
roblem(.cat.).wasy := problem(.cat.).wasy+1; 

read(filename,symbol) ; 

clearscreen; 

readln( filename ,comm) ; 

input_cat_comm; 

comment(.chapt,a.).pages := comm; 

numcomment(.chapt.) := a; 

a := atl; 
end; (* else *) 

end;(* procedure *) 
KAKAKKAAKKKAKAAKKAKKKAKKAKAAKKAKAAKKKKAAKARKEKAAKKAAKAKAKARRKAAKARAKARAKKARAKK 


Procedure Decision ae . a 

* This procedure compares the probability of student ability x 

. passed from procedure calculatele&Z to the cutsott vallteu ae a 

z hen make decision about student's knowledge in that test. This * 

* procedure is called by procedure display_question. * 

RKAKRAKRKAKKRKKAAKKKARK KKK KK KKK KKAKKKARAK RRR KKK KKKK KKK AKA KK AKA ) 
procedure decision(p:real;var sel:boolean;var chapt:integer; 

var flag:boolean) ; 


if (p = alpha) or (p > alpha) then begin 
if flag then begin 
rec gohan 2y := '" YOU ARE ABOUT AVERAGE IN THIS PART "'; 
Bee schapt.s ). fidget aie, 


en 

else begin 
ee ena ee i oewee '! YOU ARE ABOVE AVERAGE, EXCELLENT! "'; 
rec(.chapt.).flagl := true; 


ena; 
end(* if *) 
else if (p = beta) or (p < beta) then begin 
rec(.chapt.).poor :='" YOU ARE BELOW AVERAGE IN THIS PART "'; 
rec(.chapt.).flagzZ <= true; : 
end(* else if *) 
else if (p > beta) and (p < ee then pean 
rec(.chapt.).av := '" yoOU ARE ABOUT AVERAGE IN THIS PART '"'; 
rec(.chapt.).flag3 := true; 
end; | 
end; 


KAKRKKKKKAKKKKKKAKKKKKAKKKKRKAKRKKKAKRKKKKKERKARERKKRKRKARARAKRERKRRKRKKREKRRRERKKKAKRE 
* 


. Procedure Make_decision aa 
This procedure compares the probability of student abilit * 
pease from procedure calculatel&2 to the cut-off values .4,. a 
hen make decision to go on next questions set or not. ES me 
the probability is in between the cut-off values then present a 
_ next set of question otherwise stop questioning the student. * 
KRAKKAKAKKKKK KK KAKA KKK KKK KKKKKKKKKK AK KK AAKKK KKK AR KAKK KKK KAKKKAAKKKE ) 

procedure make_decision(p:real;var sel:boolean;var chapt:integer; 

var flag:boolean) ; 


* 
* 
* 
* 
* 


begin. 
if (p = ar or (p > alpha) then begin 

spac ; 

See seek AOI RRR ee ee : 
writeln('* peg 22), 
writeln('* | YOUR KNOWLEDGE IN THE PREVIOUS LESSON %*':63); 
writeln('* IS SATISFACTORY *' 363); 
writeln('* YOU ARE FINISHED WITH THIS LESSON *!':63); 
writeln('* ao2); 
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Beacon a L AAAKARAAAAK KAKA KK RAKARKAKRKAKAKARARKRKERKAKE | 363) 
writeln('* AOS): 
writeln('* YOU ARE WEAK FOR THIS LESSON *' 363); 
writeln('* *' 363); 
preecin(¢ 219) SiUDY’<7 pane cnapt. ).subname:28,'AGAIN' :7,'*':2); 
writeln('* *! 363); 
Roe cean s YOU ARE FINISHED WITH THIS LESSON 71 263 ; 
me cesn TR PAAR Rak RARR RK ARR RERRARRAARARAARAKARARREAN 063 
cTearser: 
clearscreen; 
= false; 
end(s else if *) 
else 3(7\% > beta) and (p < alpha) then begin 
pee ote 1 KARAKAAAAAAKAKARAK ARK RAKE RKKKAKKRRKKAAKAKK RAKE GG) ; 
rc @ ln *' 366); 
writeln es YOU ARE ABOUT AVERAGE SO FAR poo); 
Tolle ieee wee secon lNUE ON THE REST OF THE QUESTIONS *' :66); 
writeln('% GOL: 
WEL] 1 | AAAKAAAAAAAAAAAAKARARAKAKAKAKAAKKRARKKAKAKAKAKRKE | 6G) | 


end; 


Bie) tee ema ana A AARARIRAA RA AA IRAE 63) ; 
ace(3); 

a earscreen; 

sel := false; 


end 
else if (p = beta) or (p < beta) then begin 


epeceke) 7 
clearscreen; 

sel := true; 
end; 


rocedure suggesthead; 


egin 


end; 


KRAEKAKKKKKKKRKKRKKKRKRKRKKRKRRKRKRKARKKRKEKRKRKRRKKRKRKRKRKRKKKEKEKRKRKRKRKERKRRRRKEKRKERRRKRRKRRERERK 


* 
* 
* 


KRKRKKKRKKKKKRKREKKAKRERE 


At the end of the first two se 
be called to provide information to Sens student of 


writeln; 
writeln('! : 
writeln(' * “YOUR PROBLEMS AND SUGGESTIONS FOR IMPROVING *' 
wmceln( * 
writeln; 


Procedure Evaluate 
This procedure is called ey procedure display_ question. 
of questions, eas PEccoeur ¢ cree 
he paevious 
erformances then procedure make decision will be called n 


procedure evaluate(var chap:integer); 


var 


begin 


j,i : integer; 


writeln(' ie 
space(1); 

if(chapter(. chap.).count<>chapter(. gepeDs ).block) then 

pe eet You have not yet completed all the questions.':50) 

else 


writeln(' You have completed all the questions at this time.!:54); 


space(1); 


writeln(' You will now be evaluated on what you have done so far.' 


space(1); 

writeln('THERE ARE! :17 ,»chapter(.chap.).block:3, QUESTIONS.'); 
write(chapter(.chap.). crit: 12); 

writeln('critical questions. '!:21); 

write(chapter(. geHaD ).comp: 12); 

Writeln('complementary re ':26); 

PS POMC DADE eyay: 2 sup 

writeln('supplementary Bee ene. :26); 
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SH +O 


xt. 
ee RE CLEA RRA AERA RR AR ERE RRR 


$55) 


space(1); 
iF(chapter(. chapee et eas chap. ).serit) then 

writeln('you have answered only the critical questions set.':55) 
else if(chapter(.chap.). eoune=che oes chap.) crite: 

chapter (. chap. ).comp) then 

writeln('you have answered both critical and complememtary sets! 61) 

else if(chapter(. chap.).count=chapter(.chap.).block) then 
writeln(' you have answered all the questions’: 40); 


We eee correct answers 230,chapter ee PAP.) - as corre Bi 
eae incorrect answers = :32, chapter(.chap.).wrong:5 
space 
if (rec(.chap.).flagl = uy) then begin 
yeiteln rec(, chap.).ex:46); 
en 
else if ae «chaps \e flag2 = true) then begin 
eeeerD rec(. chap. ) poor :45); 
en 
else if rec) .chap.).flag3 = true) then begin 
writeln(rec(. chap. ).av:45); 
end; 
writeln; 
bled (problem(, a ae eae sy > 0) oe eee 2.).wasy > 0) or 
(probl 3+). .wasy > 
Veena BES de eeeeie aa easy nn RZ 
if (secnianghe .).wasy > 0) then begin 
Bees You have made! ,problem(.1. -wasy:2); 
te n(' mistakes about proce eon ine 
ane (sroblem(.2 .).wasy > 0) then crate 
Wee You have made',problem swasy:2); 
eae n(' mistakes about calcu Sea '\;; 
dee (problem(. 3.).wasy > 0) then. Benes 
writels oe have made', Deobeen wasy:2); 
writeln(' mistakes abou physical eee an i), 
end 
writeln(' ree eh) 
end; . 
RARKEKKRARKRKRERERKERERRKERERERERERER ARERR RERERERERERERERRERERERERERERREKE 
Procedure One_chapter_conclusion * 
a This procedure is called by procedure ask_conclusion at the * 
* end oF each test, whether the student want to see the results if 


Of 30 previous test or not. 
KE ee AERA ERARERERRRIRER ER ERER EKER ERIKA RARE RARER RARER ARERR RARER ) 


procedure one_chapter_conclusion(var chap:integer) ; 


var 
_ j,i,k : integer; 
begin 
space(1); 
or 1 := 1 to maxbook do begin 


if (b = i) then begin 
writeln(books(.i.).name : 40); 
space(1); 
for j := 1 to nase do begin 
if (chap = j) then 
,weiteln part(.j.).subname :38); 
end; ae ) 


end; Coens 
space 1); 
writeln('THERE ARE':17, Chapa aG chap.).block:3," QUESTIONS. 
We Dee Beet (7Chan oe crit:12 
writeln(' critical questions): ie 
Wee | cha comp :12); 


writeln('comp ementar} questions' 226); 
he poe Cl ena SUD sE2 
writeln('supplementary questions’ 226); 
space(l1); 
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if(chapter(.chap.).count=chapter(.chap.).crit) then 
writeln('you have completed only the critical questions! :43) 
else if(chapter(.chap.).count=chapter(.chap.).crit + 
. chapter(.chap.).comp) then 
writeln('you have completed both critical and complememtary' :58) 
else if(chapter(.chap.).count=chapter(.chap.).block) then 
writeln('you have answered all the questions': 45); 


Seer or et Correct answers =':36,cha Beers yer ences. 
writeln('Total incorrect answers =':38,chapter(.chap.).wrong:5S) ; 
space(1); 
if (rec(.chap.).flagl = true) then 
writeln(rec(.chap.).ex:46 
else if (rec(.chap.).flag2 = true) then 
writeln(rec(.chap.).poor:45 
else if (rec(.chap.).flag3 = true) then 
_ writeln(rec(.chap.).av:45); 
writeln; . 
writeln('Following is a report of your performance! :50); 
wraiteln; | 
foul c- 1 to matarea do begin 
at See eee 20s ace begin 
writeln(area(. eens 
write('Pts =':10,area(.1,1.).correct:3,',','Total =':10, 
area(.1,i.).count:3,',','Percent Grade Bee 
x := ((area(.1,i.).correct/area(.1,1.).count)*100 ); 
Wieder mC 32 ) > 
writeln; 
end; (*iE*) 
end; (*for* 
suggesthead; 
ror 2= 1 to maxcatsde beqin 
Lf (erobiem(.i.)-flaq) then begin 
writeln(problem(.1i.).name) ; 
write('Pts eae connect 3,071; ,10ral =':10, 
problem(.i.).count:3,',!','Percent Grade =':17 


Lois 
x:=(problem(.1i.).correct/problem(.i.).count)*100; 
writeln(x:8:2); 
if (problem(.1.).wrong <> 0) then begin 
writeln(' You should review as follows! :32); 
fOmek >= taco problem(.1.).wrong do begin 
WigwGeCisa, ja 
writeln(problem(.i.).comm(.k.)); 
endss(*for*) 
writeln; 
oe ee SO \elorayal 
__ writeln('** Study more! You are weak here. **':40); 
if problem(.i.).wasy > 0 then begin 


Writeln(' ** ‘Be careful on easy question! **'); 
Be You missed', problem(.1.).wasy:3) ; 
write(' of them in the total of'); 
writeln(problem(.i.).easy:3,'.'); 
ena; 
aie at ) 
end; (*if*) 
wWriteln 


; 
end; (*if*) 
end; (*for* 
Cie 
KAKA KKKRAKK RR RKKK RRR RAK ARK ARERR RKRR ARK KRERK KERR AR RKAKKRRR ARR RAR RRR RR 


Procedure Bese al —qucet ton a 
x This procedure calls procedure calculatel&2, decision, * 
x evaluate, and make_decision. Main activities are done in this x 
* procedure, and is called by procedure select_chapter. Questions * 
* will be read from a file and dis lay through the screen. “ 
RARKAAKKREKERK KEKE KKK KERR RK AK KEK REE EKKK RAK KEK ARK KKK AEREREK RAE ) 
procedure display_question(var count:integer;var correct:integer; 

var pone ea ceder svar filename:text; 

var chapt:integer;var flag:boolean) ; 
var 
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sel: boolean: 
i,ml,r1,wl,nl,m2,52,W2, ge: seeder 


_P: real; 
begin 
flag := false; 
ml := O; rl := O; wl := QO; 
m2 := 0; £2 := 0; WZ .= 07 
nl := Spee ee come 
n2 := chapter .chapt.).comp; 
COUune =o; 
correct := Q; 
wrong := 0; 
1 :=1; 
sel := true; 


while sel and not eof(filename) do 


ae CCEuL bol) 
rea Llename,s ea) 
ol = !! ivan 


1f symbol 
begin 
Sele ea eos, 
readln( filename, question) ; 
end — i(* ate) 
eC 
egin 
“Pacer 
while not (symbol = '$') do 
begin 


readin(filename, question); 
Write(s ol); writeln(question) ; 
read(filename, symbol); 
end;(* while * 
readin( filename, question) ; 
write(' '); writeln(question) ; 
space(1); 2 
compare_answer(count,correct,wrong,i, filename, 


chapt) ; 
end; (* else* 
if (count = ni) then begin 
calculatel(chapt,correct,wrong,count,p,ml,r1); 
Gleegnscheem: 
Seer aereee chapt, flag); 
evaluate chapt); 
clearscreen; 
make_decision(p,sel,chapt, flag) ; 
end (*if*) 
else if (count > nl) and (count = nl+tn2) then 


egin 
eles := true; 
calculate2(chapt,correct,wrong,count,p,m2,r2); 
Clearsercen, 
Sec iam ease chapt, flag); 
evaluate chapt); 
oa SoU Sue at | 1 chapeaeneen 
make_decision(p,sel,chapt, flag) ; 
end (*else*) 5; 2 : 
end; (* outer while * 
end; (* procedure * 


RRKKKAKKAKKKRKKKKAKRKEKKKKKKKRKRKRKKRKRKRRERERKEKRKKRERERKKRERKRERRRRKRKKEKRKEKRKRKKAKKKAERI 


Procedure Storedata _ 
Z This procedure is called by Piocea ene process to store — = 
S the datas of what chapter student have done, number of questions, 


n er correct and incorrect answer in each chapter, 
KAKAKRKRR ARK RK RR AK RK KRKEK KEK RRA KKK RRR AER RRA RK RK KKK RK KEK RKKKARKEK ARE ) 


procedure storedata(var c:integer;var cor:integer;var w:integer; 
chapt:integer) ; 
var . 
es anegen- 
begin . 
for 1 := 1 to maxchap do begin 
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af Mcheee Say vet). ae = chapt ) then begin 
chapter(.1. ount := c; 
Chapter... pecerere := cor; 
sane ae .1.).wrong := w; 


we fon 7) 
end; (* Rea a) 
KAKKKKKKKKKAKKAEK AKER KAKAK KAKA KARR KKARKKAKAKARAKAKKKKEK AKA KKK AKKEKAKKAK AK K 


‘k 


“wa 


Procedure Readchapter x 
* This procedure is called by procedure what_chapterl&2 to os 
* eeeut which chapter student want to test upon and the data is * 
* ed out to some other procedures durin x 


AKKK PAA AE RHA RE RH See SEER ERS SER SI a aia ) 
procedure readchapter(var chap : integer); 


var 
flag:boolean; 
mc: Char; 
begin 
Bend. false; 
while not flag do begin 
readln ig 
if c = '1' then begin chap := 1; flag := true;end 
else if c = '2' then begin chap := 2; flag = true;end 
else if c = '3' then begin chap := 3; flag := true;end 
else 1f c = '0' then begin chap := 0; flag := true;end 
else begin 
eke "type again only number please " '); 
flag := false; 
end; (kelse*) 
(* while*) 
end; (x et *) 
rocedure what eqneptenawar chap : integer); 
egin 
space(5); 
writeln paar BRR RE RAAT KEL ASARARAALRARARAKRRARARWARAREE 0266 
piace | * *'! 366); 
Peace ln{ '* " PRIVATE PILOT STUDY GUIDE iy *' 366); 
Peace ln( '* SELECT ONE OF THE FOLLOWING K' 366) ; 
Migce int '* kX! 366); 
writeln('* TE Es: 6): 6 for NAVIGATION *' 366); 
writeln('* TYE RR 26-2 «os for RADIO NAVIGATION *' +66); 
Piaeace Lye TYEEeeeoa eee bor NIGHT FLYING *' 366); 
writeln('* TYPE Ol. . for SELECTING ANOTHER BOOK *'! 366); 
writeln('* *X' 366); 
WLLL] Lr! RAAKAKKAKKKAKKAAKAKK AKA AKA AK AKKAKAK KARE ARK AKK KK RAEKKR | GG) 
readchapter(chap) ; 
pedteln(":',chap:2); 
end; 
peecure what_chapterl(var chap : integer); 
egin 
BE eae) | 
WELLE LT ( | RAKAAKAAKAAKAKAAKAKAAKAKAKAKAAK AAA KAKA AK RAKAAKEAAKAAK | G6) 5 
writeln('* *' 366); 
writeln('* " STUDENT PILOT FLIGHT MANUAL " 7260) > 
writeln('* SELECT ONE OF THE FOLLOWING *! 366) ; 
writeln('* oS ) 
writeln('* TYPE R@leraees tor “PART = ONE Roe ))t 
writeln (x TYPE @e2.....t0r PART - FWO *' 3:66); 
writeln{'* Teor nor PART = THREE pa: OG); 
writeln ix TYPE 0O..... for SELECTING ANOTHER CONCEPT *':66); 
writeln{'* x! 366); 
WELt| Ln ( | RARAARAAKAAKAAKAAKAKKKAKKAAKAKARAKAAAK AKA K AKA AKAAKRAKK G6) ¢ 
readchapter (chap) ; 
writeln(':!' /chap:2); 
end; 
rocedure begin_chapter(chap:integer) ; 
egin 


space(7); 
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WLLte Ln ( | RRAKAKAAAKARKAKKKKKKKAKKKRKAAKKKARKAKKKKAKKAKRKE | 260 


writeln('* 


writeln ae THIS IS THE BEGINNING OF THE LESSON x, 760 


writeln 


WELLS LIC | KRKAAAAAAAAAKAAAKKRKAAKKKAK KARR AAKKK RARE G0) 


Spacey: 
clearscreen; 
end; 


x! 360 


“=e “oe “OS “SO =O 


KRARARKKKKKRKAKKKKRRKRRARKRKRKRRRKRKRRRRRRRRRRRRRRRKRKRRRRKRKRRRRKRRRRRRRRRRARRRRRRKRRRE 


Procedure Input_question 


This procedure is called by procedure prc 
student selected any chapter to test then this 


rocess. After the 


rocedure will 


x 
® 
Ps determine how many questions in each test and also in each set 


of questions for the system to use these informations later. 


KKK 
procedure input_question(chap:integer;var filename:text) ; 
var 

Pee incege ra, 
begin 


eee ee 
chapter(.chap.).block := q; 


readlin(filename,q) ; 
qd? 
Seen Gene e cee 


chapter(.chap.).crit 
readln(filename,q); 
readln(ftilename,q); 3! 
‘i chapter(.chap.).sup := q; 
end; 


rocedure end_chapter(chap:integer) ; 
egin 
space(7); 


WEHLtCeLN( | RAKKAKAKAKAAAKKAKKKKKKRKKKKEKKRKKKAKKKKKE | OG 


writeln('* 


writeln ie THIS IS THE END OF THE LESSON ni 304 


writeln('! 


writeln LRA AKAKAKAKAKAKKAK RAKE KRKREAKKRRARRRRE A BY 


Speecne 7 : 
clearscreen; 
end; 


procedure ask_conclusion(var chap:integer) ; 
var 


ch : char; 
flag : boolean; 

begin 
flag := true; 
See | 
WELCO LN ( | RARAKARAKAKAARARAKEKAKRKARARERERRARERARERERRRRARARRKE | 
Writein(!* 
writeln('% DO YOU WANT TO SEE THE RESULTS es 
Woicein( '% : 
writein('% ie PRESS " ANY KEY " ret 
writeln('% NO PRESoe Neu oes 
writeln('* 


readin(ch); 
Wigagee bmi’: * Chea oa 
if (ch = 'n') or (ch = 'N') then flag := 
else begin 
page; 
one_chapter_conclusion(chap) ; 
clearscreen; 
end: 
end; 


xk! 354 


=e =e SO “BQ =O 


AI, 


* I e 


ace 
WELCe Ly ( | KARKAKARARKKARARKRKRAKRAARARKKARREKRKARKRARAKRARARRERRERRRE | 


false 


KRREEKEKKRKRRRRRRKRRRRRRRRRRRRKRRRRRARRERRRRRRRRRRRKRRRKRRRRKRKRRKRKRERRKK 


~e Se Se Se NO Ne NO NO 


FOO OE 


RAKKKKKKAAKKKKAKKEKKKKKKKKKEKKKKKAKKKRKKAKERKARKEKRERKERARKRKRKERKERERKRERERREK 


Procedure Process 


z This procedure is called by procedure selectchapter. Five 


x procedure are called by process for the purpose of eliminating 
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* 
* 
* 


* redundancy in procedure selectchapter . * 
KAAAKKAK RRR KKRKK KARR KR AKER RRR EK RRR KKRKKKKEKEKER ERE ER EKER ERE REE ) 
procedure process(var cou :integer;var cor:integer;var wr:integer; 
Var Chapvinteger;var sel:boolean;var flag:boolean; 
var filename:text); 
Pomecont = char; 
begin. 
input_question(chap, filename) ; 
display_question(cou,cor,wr,filename,chap, flag) ; 
storedata(cou,cor,wr,chap) ; 
end_chapter(chap) ; 
ask_conclusion(chap) ; 
page; : 
continuesession(cont,sel); 
end; 


RERKRRKRKRKRKRREKRRKKRRRKRKRKRKRKRKRKKKRKRRRKRKRKRKRRRKRRRRRRRRRRRRRRRRRRRERRRRRRRRRKREERE 


; maOceaube soe LeCLciap cer 

Zs Tivomneceaune calls procedure process after determined which 

x chapter is needed by the student to work on. It is called b 

* Maecccute open_close_session after knowing the student want to 

* egamecne Cest) Thisiprocedure is designed to work only two 

* concepts and only three chapter imeaaconcent. 
KAKKKKKAKKKRAKKAKAKKAKKKKKAKKRRKKRKKRERKEREKRRRREKRKRRKKRRKKRKKRKRKKKKKKK 

procedure selectchapter(var select : boolean;var count:integer; 


var correct:integer;var wrong:integer) ; 


OE OF 


var 
chap : integer; te number of chapter *) 
cont : char; * read y/n to continue next chapter *) 
flag : boolean; 
begin 
flag := false; 
chap := 


Select := true; 
while select do begin 
case book of 
lee esclect s= raise: 
mi =: begin 
what_chapterl (chap) ; 


page; 
case chap of 
0 select := false; 


Poel nee 
begin_chapter(chap) ; . 
part(.chap.).subname := '"PART - ONE" (Before Flight)'; 
part(.chap.).fsub := true; 
reset(filel,'filel text'); 
rocess(count,correct,wrong,chap,select, flag, filel) 


ena: 
nee begin space(7); 
Meer FILE IS EMPTY, NO QUESTION !'); 
writeln(' Seep TO! BE fILEED IN.. '); 
Cleanse neenn 
continuesession(cont,select); 


end; 
3 :*begin space(7); 
peer FILE IS EMPTY, NO QUESTION !'); 
writeln(' .-NEED TO BE FILLED IN.. '); 
GEearscreci: 
continuesession(cont,select); 


end; 
end;(* case *) end; 
ia 2 Degin 
what_chapter2(chap) ; 
page; 
case chap of 
0: select := false; 
1 : begin 
Weeceidn« |! (Fi LE lS EMPivee) NO QUESTION !')- 
clearscreen; 
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continuesession(cont, select) ; 
en 
2: begin space(7 ); 
Wiadete denne FILE IS EMPTY, NO QUESTION !'); 
clearscreen; 
continuesession(cont, select); 


Sut eeetn space(7) ; 
writeln( FILE IS EMPTY, NO QUESTION !'); 
clearscreen; 
continuesession(cont, select); 


en 
end; (* case 7 end; 
'3' : select:= false; 
(x case * 
end; a while *) 
end; (x proc) 


rocedure goodbye; 


egin 
space(8); 
writeln | RAAAAKAAKAA KA ARAARAARARRAARAARRKIKK | 5A : 
writeln('* x1 354); 
writeln ix HOPE TO SEE YOU AGAIN *'!354); 
writeln('* *' 354); 
WELLE Ln ( | RAAAKAAAAKAKAAKAKAAKAKAAKAKAKRARRKE | 54) « 
space ee 
clearscreen; 

end; 


KKEKKKKKKARKEKKKKKKAKKKRKKKKKKKRKKKKKKKKRKKKRKRKKKKKKRKKRKAKKKREKKKKKKKKKRRKAKKAKKERKKE 


Procedure Inputfile 
* This peer cure updates the student's performance in the 
x historical text file and also compare student's performance 
* between his last test and the pene coe test. It is called by 
* Procedure Conclusions at the end of the session. 
JOC GSO IS ICCA R oo I CoE I SOC I I I I IR I I IR RAR RII I II ARIK 
pEoce ake ET eee :real); 
var found oolean; 
begin 
reset(pilotf,'pilotf data'); 
rewrite(tenpfil e,'tempfile data'); 
found := fa 
repeat 
read(pilotf,pilotnum) ; 
if (testnum = piiotnum) then begin 
write(tempfile pilotnum: 10); 
read(pilotf£,pilotname) 
write(tem file Se :20) 
read(pilotf /pilotdate) ; Saco pilotgrade) ; 


Pr a a a 


writeln; 
weer Your last test was on ' eee aeeve ye 
writeln And the grade was ', en 3). ae 


if pilotgrade > y then begin 
write nt Your grade Eeeay was!, tee 
writeln You are weaker than ote he "Study harder'!'); 


end 
eae ast pilotgrade < y then begin 
ee Your grade today was',y:8:2,'.'); 


eee Good, you are improving! '); 
en | 
else 
writeln(' Your grade today was',y:8:2,',',' SAME'); 


pilotgrade := y; 
pilotdate := todaydate; | 

Wi ee Nee ey /pilotdate:15); writeln(tempfile,pilotgrade:8:2); 

foun true; 
end(*1£*) 
else begin 

write(tempfile,pilotnum: Poe 
read(pilotf, pi otname ) 
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* 


write(tempfile,pilotname:20) 
read(pilo f pilotdate) ; readin(pilotf,pilotgrade) ; 
wWeite( temptile pilotdate:15) ; 
writeln(tempfile,pilotgrade:8:2); 
~_end; (*else* 
Int Leon Diem ey 
Liiotround Enel : 
PauLeln tenpemren testnum 210, name:20, todaydate:15, y:8:2); 
reset(tempfile,'tempfile data'); 
rewrite(pilotf,'pilotf data'); 
repeat ; 
read(tempfile,pilotnum) ; 
read Sembfi le, pilotname 
read(tempfile,pilotdate) ; Fey cae yecaoe caes | 
WETS RT otf,pilotnum:10); write(pilotf,pilotname:20 
write(pilotf,pilotdate:15); 
| Writein(pimett ,pilotgrade:6:2); 
until eof(tempfile) ; 


e 
/ 


end; 

rocedure heading_conclusion; 

egin 
gesces 6) } 
WEL Ce in ( | AAAAAAAAAAKARARAAAAKAAKRARAARARAKARARAK 57) 
writeln Ik AN.) s 
writelin a FINAL SECTION: ce 
mime ln | SCORES AND COMMENTARY mills 57) 
writelin('* eon); 
WEL Ce Li ( | RARAAAAAARARAAAAR AK RARARAARAR AK RARARARE 57) | 
eecse) 
clearscreen; 

end; 


RARKKKRKKKKKAKRKKAKARKAKKAKKRKKRAKRKAKRKKRRRRRKRKRRKRKRRERKKRKKKKRRKKRKKKKRKRKARKKRKRRRKRKA 


Procedure Comelusion . - 
Piece nOceCUnemw melee Gabtecedeethe ena of the session. a 
x It provides all informations of what have been done a Bite = 
*x student and also provides student's difficulties and details re 
x recommendations in each test. s 
RRRAAKKRAKAKRARKAKAKK KAKA KKK AA KERK KKK ARK AK ARR KRKAKKARARAR ER ) 
procedure conclusion; 
va 
i,j,k : integer; cn index *) 
mc. real;(*~ grade ~) 
begin 
peace. 2); 
wie Le n ee le ee eee ee oe ae oe oe oe ee ee ee ee ee ee ee ee ee eee ee : 
writeln('! SCORES AND COMMENTS ne 
write in | SSSSSSSSSSSSSSsr TSH SSsSsSSssssssSsSqSsSsSSSSSsSsS=5 i : 
for j := 1 to maxpart do begin 
while are ieee Dice begin | 
1f (j = 1) or ( j = 2) then begin 
space(1); 
writeln(books(.1.).name:40); 
Space .); . 
writeln(part(.j.).subname :38); space(1); 
end (*1f*) 


else 1f (j = 3) or ( j = 4) then begin , 
ek eee space(1); 
writeln(part(.j.).subname :37); space(1l); 

_ end; (*else*) 

UpEEcim@ nian nenRe iy chapter (.).).slock:3,'  OQURSTIONS.'); 
write(chapter(.j.).crit:12); 
writeln('critical questions.':21); 


eee (el) ec #12), 
writeln('complementary Se oe Lonsile 26.) 
Wi ee peepee hy. 2). Sup 2) 
writeln('supplementary questions.':26); 
space(1) 


if(chapter(.j,).count=chapter(.j.).crit) then 
writeln('you have answered only the critical questions set' 


a 


254) 
elsé if(chapter@y.)- Coun eee ae aes + 
ore een then 
writeln('you have answered both Picea and complememtary' 
else if(chapter(.j aye nee U tec her eee J; 7) block) then 
writeln(' ou Ae answered al uestions' : 45 
writeln('Total correct answers =':36,chapter(.j.). correct: ae 
ce ‘Total incorrect answers ='! 38, c ae: j.).wrong:5 
write 


ie eel os fag = true) then 
write i(rec( J K:4 


else if (rec flag = Pe then 
writein(eee (3 J poo 

else if (rec( Bey = 

j- 


254) 


= true) then 
_ writeln(rec 


eee DEewe.ae Jihad pen * I Me .count)*100; 
input ile(g); Tk compare to history * 
spac 


writeln(' Following is a Sane of your performance! :50); 
woiteln; 
for i := 1 to LUE do begi 


Li (areas cee) een begin 
writeln eae j,1.).name); 
write('Pts =' on canoe 3, i. ).correct: Kee =';10, 
area(. pare a count: =a, 'Percent ee =';1 
x ( (area ake nonPeeEeeeae rls jee Saunt yeaa 3 
write n(x:8 ie 
writeln; 


end; (Xi £*) 
end; *for*) 
suggest ead; 
or i :=1 to maxcat do be 
1f (problem(.i.).flag 


Benen begin 
vetee( Seger to. ee ane 
write('P Ae blem(. 1. ).correct:3,',!','Total =':10, 
problem(.i.}.coun ‘Percent Grade =':17); 


X: SS oen Ale -) correct MESRIene Lao count)*10 0; 
writeln(x: io Z) 


ae (problem(.i no "Should 0) then begin 


writeln(’ You should review as follows! :32); 
for k 


roblem(.i.).wrong do begin 
aoleeae . Py : 
writeln(pro ene i, COMM eee ee 

end; (*for*) 
writeln; 
if x < 50 then 


writeln('** Study more! You are weak here. 


AK! 340); 
if problem(.i.).wasy > O then 


begin 
writeln(! *k “Be careful on easy apesere aa? 
write You missed’, problem( .1 .).wasy:3 
write(' of them in the total of! ie 
writeln(problem(.i.).easy:3, ; 
end; 
writelag? 
end x) 
writeln; 
end; — ') 
end; (*for* 
clearscreen; 


part(.j.).fsub := false; 


ann (x else *) 
end; (* "onGcenue x) 


Ste Ade AR RAIA IR AKI IIA RAIN RAE ERR ee eee eee 


Procedure open_close_session 
‘ This procedure receives the boolean Fane from procedure 
i beginsessionl, if true then the session wil 


begin otherwise 
it will set program flag to false and exit the program. 


OO OOF 


T2 


KARKKAKAKKAAKKKAKKKRKEKKKKKEKRKKKKKKRRKKKKRKRKRKAKKRKRRRKRKRKRRRKRKRKRRRRKRRKKRERERKKRERE 


procedure open_close_session(var continue:boolean;var select:boolean; 
var count:integer;var correct:integer;var wrong:integer) ; 
var y : real; 
begin 
if continue = false then begin 
Reenete = false; | 
Hecehnc scone listo, 
conclusion; 
end 
else selectchapter(select,count,correct,wrong) ; 
end; (* procedure 


x MAIN PROGRAM*) 
begin 
page; 
welcome; 
Initializevalue; 
Beoe dL 


beginsessionl (continue) ; 
open_close_session(continue, choose ,numq,right,wrongq) ; 
until next = false; 
goodbye; 
end. (* end of program *) 


fe 
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